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ECRITURE ARABE 
(SUITE ET FIN) 


Michel La Rosa 


Des lecteurs m'ont demandé 
plus d'explications sur la correspon- 
dance clavier AZERTY - alphabet 
arabe. Vous le trouverez dans le ta- 
bleau ci-contre. 


Les quatre chiffres de la figure 1 
(voir CPC infos 34 page 48) corres- 
pondent généralement aux quatre 
positions possibles pour chaque let- 
tre (isolée, finale, centrale et initiale) 
avec le moyen de les obtenir: par 
exemple, pour obtenir le Alif isolé, 
taper 2 fois COPY puis A; mais pour 
le Sad, taper & s'il est initial, é s'il est 
central, COPY et é s'il est final, 2 fois 
COPY puis é s'il est isolé. 


Un cas particulier, celui de la 
hamza: en position supérieure au 
dessus du alif initial, taper SHIFT puis 
A puis à (la hamza se surajoute au 
alif). En position inférieure, même 
chose: taper SHIFT puis À puis ç. En 
position haute (sur une autre lettre) 
taper la lettre puis COPY puis ": en 
position basse sur la ligne d'écriture, 
il suffit de taper . 


CLAVIER 


ALPHABET ARABE 


Dad (emphatique) 


Fa' 


Ha’ 

Ha’ (emphatique) 
Djim 

Kaf 

Lam 

Mim 

nun 


*Ayn 


Les voyelles brèves s’obtiennent 
au moyen des 3 signes À (a), < (ou) 
et > (i): la nunation (ann, oun, inn) 
s'obtient en tapant COPY avant la 
voyelle brève correspondante. 


La shadda ‘redoublement 
d’une consonne) se marque en su- 
impression en tapant « après la 
conne correspondante: il s'inscrit au 
dessus d'elle. 


On peut à volonté allonger un 
mot (pour un titre, où simplement 
pour mieux espacer les lettres dans 
un même mot si l'on dispose de la 
place suffisante) en rallongeant la 
ligne de base au moyen de SHIFT 
puis -. 


Dans tous les cas, attention à 
laisser la touche CAPS LOCK en po- 
sition minuscule avant de commen- 
cer à écrire, où gare aux surprises. 


Corrections à apporter au pro- 
gramme ARABES.BIN: 


CLAVIER ALPHABET ARABE 
Tha' 
Qaf 


Ra’ 


Ta’ 

Ta’ (emphatique) 
Dhal 

Waw 

Kha' 

Ya’ 

Zay 

Sad (emph. initial) 
Sad (emph. autres) 
Za' (empr. initial) 


Za” (emph.autres) 





725 IF a=35 AND fl>0 THEN... (au 
lieu de 725 IF a=35 AND fl=0 THEN...) 


La commande de l'imprimante 
se fait en tapant COPY puis #, et 
non plus en tapant CONTROL puis 
COPY comme dans le programme 
initial. 


PAC BALL 2 


Si vous avez des difficultés 
dans le tableau N °23 de mon 
jeu PAC-BALL 2 publié dans CPC 
INFOS N° 32, alors insérer la ligne 
suivante dans le loader BASIC: 


195 POKE &9669, &C9 





ACITALTIE 


LORICIEL 


ous désirez vraiment vous éclater le 

cortex et que vous avez déjà épuisé 

les ressources de jeux comme Tétris, il 
ÿ a encore, heureusement, un nouveau chal- 
lenge de l'esprit. Son petit nom : Booly. Com- 
me son collègue le Rubik's cube, Booly est un 
jeu de couleurs et de connexions. 


Les principales différences concernent la sur- 
face de jeu qui est plane dans le jeu de Lori- 
ciel, le nombre de couleurs limité à deux et 
enfin la représentation de ces couleurs qui 
peut affecter la forme d'anges et de démons. 


Le but du jeu est simple : il suffit de colorier 
tous les objets présents avec la couleur indi- 
quée dans le tableau de bord. Seulement la 
difficulté réside dans les connexions qui peur- 
vent exister entre les objets. 


Ainsi, il arrive qu'en modifiant la couleur d'un 
pion, on modifie également la couleur des 3 
autres pions qui l'entoure. 


Ce n'est pas donc gagné d'avance, d'autant 
que le temps de réflexion est limité. 


Si vous ne deviez acheter qu'une seule com- 
pilation dans votre vie, achetez celle-ci : le 
2ème sens. L'argent ainsi dépensé (249 F) sera 
versé à l'association «Les enfants du silence». 
Cette association a décidé d'équiper d'ap- 
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pareils et de logiciels spécialisés les 160 écoles pour enfants sourds 
et mal entendants. Cette compilation réunit les titres suivants : 
Bubble Ghost, Freedom, Pick'n Pile, Pinball Magic et Superski. Les 
éditeurs concernés par cette opération : Infogrames, Coktel Vi- 
sion, Ubi Soft, Loriciel et Novtech/Microïids. 


Quelques compilations en vrac pour finir. Hit Sports vous offre sept 
jeux ayant un caractère plus ou moins sportifs : Turbo Cup, Rally Il, 
Tennis, Foot, Crazy Shot, Space Racer et Karatéka. 


Si vous ne possédez ni Skweek, ni Moonblaster, ni Lode Runner, 
alors vous n'avez aucune excuse pour ne pas acheter la compila- 
tion Top Action ! qui réunit tous ces titres. 


Enfin dans Success Story, vous retrouverez des titres qui sont deve- 
nus célèbres : Crazy Shot, Skweek, Bumpy, Turbo Cup et Space 
Racer. Comme vous le remarquerez sans doute il va falloir choisir 
entre Hits Sports et Success Story car certains titres sont en double. 


UBI SOFT 


œ hez Ubi, on fait aussi dans 
la compilation avec «les 
Costos»r. On trouve donc 6 
jeux d'arcade/plate-forme : Flim- 
bo's Quest, un jeu assez mignon 
avec de beaux graphismes, Twin 
World, Rick Dangerous Il, le célèbre 
aventurier aux prises avec des ex- 
tra-terrestres, Munsters, Popeye Il, la 
suite des aventures du marin man- 
geur d'épinards et enfin Andy 
Capp, le héros de bande dessinée. 
Il est à noter que la version CPC de 


DOMARK 


i vous êtes un fanatique des 
salles d'arcade, vous avez 


certainement déjà aperçu ce 
jeu au look assez étrange : Pitfigh- 
ter. 


On y voit des lutteurs de toutes dis- 
ciplines : catch, Kick Boxing, karaté 
qui s'opposent dans des matchs 
sans merci et sans règle aucune. 


Ce qui fait la particularité de ce jeu, 
ce sont les représentations des 
joueurs qui sont numérisés d'aprés 
des combattants réels. 


Hélas, sur CPC, pas de numérisa- 
tions, l'adaptation devra se con- 
tenter de joueurs dessinés. 


Espérons que les zooms impressio- 
nants seront encore là mais il ne faut 
pas trop rêver. 


Comme le dit le proverbe, «c'est 
dans les vieux pots qu'on fait les 
meilleures soupes». Partant de cet 
adage, The Kremlin s'est attaqué à 
l'adaptation sur nos micros de Spa- 
ce Invaders. 


En fait, je devrais dire Super Space 
Invaders, c'est-à-dire une version 
quelque peu améliorée de l'ancé- 
tre des Shoot'em up. 


Il devrait y avoir (sous réserve des 
capacités du CPC), une floppée de 
monstres tous plus hostiles les uns 
que les autres, des scrollings multi- 


cette compilation contient plus de 
titres que les autres versions : ce 
n'est que justice. 


Dans un tout autre domaine, enfin 
un nouvel utilitaire pour nos CPC : 
Equinoxe est un utilitaire de musi- 
que assez performant : il fonctionne 
un peu à la manière de certains lo- 
giciels sur Amiga où Atari : les 
soundtrackers. 

A la (grosse) différence prés qu'il 
n'utilise pas de sons numérisés mais 


ditititisisisti 


Super Space Invaders (Amiga) 










directionnels, Un pa- 
quet de formations 
d'attaque différentes, 
un monstre pour cha- 
que fin de tableau, des 
tableaux cachés et 
autres tableaux de 
bonus. 


Domark est content : 
les ventes de 3D 
Construction Kit se 
portent très bien 
puisque le million de 
livres sterling a été 
atteint en Europe. 


C'est vous dire le 
succés rencontré 
par cet utilitaire ori- 
ginal. 


Il existe même un 
club en Angleter- 
re et vous pouvez 
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les sonorités mélodieuses de l’Ams- 
trad CPC. Equinoxe est géré par 
menus déroulants et il semble simple 
d'utilisation. 


Les musiques créées peuvent être 
rejouées sous trois vitesses d'inter- 
ruption : 1/25, 1/50 où 1/300 de se- 
conde. 


Mais vous en saurez plus le mois 
prochain avec le banc d'essai de 
ce logiciel. 


vous y inscrire en en- 
voyant le bon présent 
dans la boite du pro- 
gramme. 


ENGLISH 
D um 


NC 


NES 


a ) 





SUPER QUIZZ | 


CONSOLES MEGADRIVE A GAGNER 





KR 


NN 
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LOUE 
225 3D CONSTRUCTION KIT … 245/245 






COMPILATIONS 





Bumpy + Skweek 
Crazyshot + Space racer 
TOP ACTION … 165/225 ALIEN STORM 
Loderunner + Skwi + Moonblaster ALI GATOR 
ULTIMATE Collection ……..155/242 ALIVE 

Zombi +Pro tennis tour + AMC + ADIDAS CH. SOCCER 





"Quand les prix 
. 198 sont si bas: 














































































































































































































Stuntcar racer + After the world + ARMALYTE .. 97/155 UTILITAIRES 
Skate war ART DE LA GUERRE 245 ADVANCED OCP ART STUDIO 245 EDUCATIFS 
CRAN STAND or 1481198 B CLOUGH EUROSOCCER .97/145 APPRENDRE L'ASSEMBLEUR . 295 CEDIC-NATHAN ([] 
Gazza + Continental cireus BACK THE GOLDEN AGE ….97/145  AUTOFORMATION BASIC …… 290 ALLEMAND DEBUTANT 6/5e … 225 nsen t 
VIRTUAL WORLDS ……….155/195 BACK TO THE FUTURE 3.105/145 CARTOUCHE basic AMSTRAD ….69 ALLEMAND CONFIRME 4/3e … 225 a 
Driller + Castel master +Darkside +  BADLANDS … 97/145 COULE Dee EU es ANGLAIS CONFIRME 4/3e ….…. 225 
The crypt BAT és Re - ANGLAIS DEBUTANT 6/5e …. 225 
ADDICTED TO FUN... 105/155  BATTLE COMMAND 105/155 COURS DE SOLFEGE 2... 145/195  DONALD alphabet magique 145/195 BAD LANDS GAMEBO 
Rainbow isiand + N.z StOY + BjG RUN 97/145 DESSIN TECHNIQUE 375 apprends moi compter MAT/CP 225 PA RBARIAN 2 
EPOPEES 1 242  BLOODWYCH 195 DESSIN TECHNIQUE TURBO .715 apprends moi à écrire CPICE 225 GHASE MQ + BASES | DAD ! 
Alive + Sdaw + Manoir de morteville BLUES BROTHERS ….…… 105/155  DISCBASE 199 Apprends moi à lire 1 MAT/CP .225  CRAZY CARS 2... BATMAN … 
WINNING TEAM BOOLY 145/195  DISCOLOGY V.6.0 5350 . end à lire 2 CP 25 EPICS WORLD OF GAMES. BEETLEJUICE 
INN TEAM ….……..…. 145/195 Fu À pprends moi à lire 2 CP ….…... 2: FIRE AND FORGET 2 BOULDER DASH 
Klax +Vindicators + cyberball + Apb + BOXING MANAGER ……… 145/195  ECHOSOFT … crues 395 LABYRINTHE D'ORTHOPHUS..225 FIRE 5 BUBBLE BOBBLE 
Escape from planet BRIDGE SIMULATOR 215 FACTURATION + STOCK 1550 LABYRINTHE D'ERRARE 225  NAVV SELS" BUGS BUNNY 2 … 
POWER UP 158/225  BUILDER LAND 145/195 FACTURES FACILES 285 Labyrinthe aux cent calculs 225 NO EXIT BURAI FIGHTER 
Toman e chars Aou à CAPTAIN PLANET ……. 105/155 GESTION DOMESTIQUE 249  LABYRINTHE ANGLOMANIA 1 225  PANG … ; CADILLAC 2 … 
185/245 CARMEN SAN DIEGO 195 GESTION BANCAIRE 245  LABYAINTHE ANGLOMANIA 2 223  PLOTTING 208  CASTELVANIA 
Licence to kill P47+C.Chaplin CHESSMASTER 2175 225 GESTION DE FICHIER 290 LANGUE FRANCAISE CE 225  PROCENNIS TOUR. 225 QUES MATE) 
+Batty+Game over 2+Ace 1+Rax DARKMAN .……….... 105/155  GRAPHEUR «275 LANGUE FRANCAISE CE2 225 SPIDERMAN US DAYS OF THUNDER 
Mange cailloux+MLM 3D + G.P 500 DEFENDER OF THE Crown 195  GRAPH-MASTER . 249 LANGUE FRANCAISE CM1 225 SWITCH BLA DOUBLE DRAGON . 
RO! DISC der en a 145195  HERCULE 2... +395 LANGUE FRANCAISE CM2 225 TENNIS CUP 2 DRAGON'S LAIR 
430 Grand prix + Battle Valley EXTERMINATOR 2 125/165 HOUSE MUSIC SYSTEM 350 LANGUE FRANCAISE 6e … 225  TOKI........… DR MARIO … 
+Super ski Light force EXTREME cm. 1259/1155 IMPRESSION … see 240 7 LANGUE FRANCAISE 5e . WIED:STREET DSTÉRMESS 
COMPIL.EXTRAORDINAIRE195/245  F16 COMBAT PILOT 142/195  IMPRIM'IMAGE .. 280 LANGUE FRANCAISE 4e …… PERIPHERIQUES FINAL FANTAZY 
Turbo cup +Sapiens +Skweek +Z0X FINAL FIGHT ……. .105/155 INTEGRE (L') 1 +425 LANGUE FRANCAISE 3e FUNNY FIELD …. 
+Maracaibo +Mobileman +Bumpy + de. INTERPRETE 2 … 280 see SCANNER DART K7/DISC …… 795 JES 
: E2 2 GARGOYLE T 
; FUGITIF …… 3 225 NATHAN MATHS 6/5e . GOYLE QUEST . 
CORÉEN A AIS dar tnye GAUNTLET 3 105155  KWIKFILE 199 NATHAN MATHS 4 AO DER CAS ess LE 248 GHOST N GOBBLINS 
HIT SPORT .…….... 1559/2259 : RE e ee LECTUER CASSETTE+CABLE . 245 
Crazy shot + Space racer +Rally 2  GOLDENAXE 105/145 LA SA UION me 595 NATHAN MATHS 3e 225 LECTEUR DISQUE DDI-1 … 1595 SROPTRUSTERS £ 
+Tennis 3d +Turbo cup +Karateka GRAND PRIX 500 CC 2 ………. 195  MAXAM disc 299 NATHAN FRANCAIS CP/CE1 225  MULTIFACE 2 + CPC PLUS. 525 GREMLINS 2 . 
COIN OP HITS 2 145/195 HERO QUEST …. . 108/155  MAXAM cassette 275 NATHAN FRANCAIS CE/CE2 225  MULTIFACE 2 + CPC. 495 HAL WRESTLING 
Dinasty wars sRIne spirit +Vigilante+ HYDRA : : .105/155  MAXAM rom... srémtttets0S J00) NATHAN FRANCAIS CM1 225  SYNTHE VOCAL DISC ou K7 545 HATRIS 
Ron ghost Te INFERNAL HOUSE MENTEL_ minitel malin + câble 350 NATHAN FRANCAIS CM2 225  SYNTHE VOCAL+HP DISC/K7..625  HIEANKY ALIEN 229 
Tümican Le IRON LORD cr. 172/220  MEPHISTO 205 NATHAN MATHS CP/CE1 225 7 LOGICIELS Educt. vocaux 195  HUNT FOR RED OCTOBER …. 229 


warriors + Turbo out run KICK OFF 2 185169  MULTIFACE 2 + CPC. 495 NATHAN ECOLE MATHS CE2.225  DMP 8160 + PROTEXT 2290 IX YOUR FACE … 




































NRJ 2 152/249 LA SECTE NOIRE 175 MULTIFACE 2 + CPC PLUS …525 NATHAN ECOLE MATHS CM1..225 EXT MEMOIRE G4k/464 490  EHOO 229 
Crazycars2+Shufflepuckcate+ LOOPZ rune, 108/145 MUSIC PRO . 225 NATHAN ECOLE MATHS CM2 225 RE 256K/6128 1090 Winx ae 229 
Mystical+Pinball magic+Light corridor MANCHESTER UNITED .97/145  STATGRAPH 350 CRAYON OPTIQUE Cassette 225 AL IBU OLLEY : 229 
SUPER SIM PACK …….….145/195  |ANCHESTER U EUROP. 105/155 THE INSIDER | 149 MICRO C CRAYON OPTIQUE Disquette … 325  AMARU'S MISSION … 229 
Snowstrike + Heavy metal+ Italy 90 . ALLEMAND PRIMAIRE MATCH-MANIA 229 
+ Turbo out run MEGA PHOENIX .….97/145  RAMDOS sens 279 ANGLAIS PR Ai VAE 529 
MONDE DES MERVEILLES 145/195  MERCS .145/195  RODOS 299 A Gi ee nes E PHASOR ONE (+MONTRE) …. 109 JV 'EOE 529 
New Zealand story+Rainbow island+ METAL MASTER … 145/195  ROMDOS 200 ITALIEN PRIMAIRE COMPETITION PRO ………… 149 MICKEY MOUSE 2 … 229 
Action fighter+Aspar GP+ Buggy 2 MIDNIGHT RESISTANCE .97/145  ROMBOARD su. 849 ESPAGNOL PRIMAIRE PRO 5000 ss 149 NAVY SEALS … 229 
CHALLENGERS 162/289  MOON BLASTER 445195 PACK GESTION 675 ANGLAIS 4/3e QUICKJOY JUNIOR ………. 59  NEMESIS … 192 





Super ski + Bomber + Kick off + Stunt 
car racer +Pro tennis tour 

BIG BANG 2 
Rick dangero Highway 


QUICKJOY 2 nu 75 
QUICKJOY 2 TURBO 135  DPERATON È 
QUICKJOY 3 SUPERCHARGER 99  PAGMAN 
QUICKJOY 5 SUPERBOARD 192  PITMAN 


475  DECLIC LECTURE 
EDUC.MATERNELLE 
EDUC MATERNELLE 2 





MULTISPORTS … ….105/155 PACK PRINTER 6128 
MYSTICAL …….….......125/162  PROTEXT disc 
105/162  PROTEXT cassette 












patrol +Beyond ice palace N : ee 105/155  PROTEXT rom ne FRANCAIS CM. SUR RIM RSROUGE a 20 PONKUTSO TANK 229 
NA Train bmemnnnes 152/249  NIGHT SHIFT … 97/1155 PAGE PUBLISHER PAO 325  GRAMMAIRE 6/5e QUELS VI JETFIQUTEE He POWER RACER .. 229 
Norihäsouth+Hostages+Tintin lune PANZA KICK BOXING ….198/245 PAGE publisher PICTURE disc .149 _ LECTURE CP QUICKJOY TOPSTAR 275. RUDUER 2e 


+Fire and forget +Teenage queen 


MATHS 2e CYCLE 1 
LIVRET DE FAMILLE … 245 PREDATOR 2... 105/145 PSYCHO TEST QUICKJOY MEGABOARD . 


315 Q.BILLION . 



























































2e CY x Ê 
Manoir de morteville + Troubadour +  PREHISTORIK ……135/175  SPRITES ALIVE ….. ” MATE ss CYGÉE 2 170/199 RON RES A AGATER ” 1e QIX 229 
Rody & mastico PRINCE OF PERSIA …… 145/195  TASWORD + MAIL MERGE ….. 425 x KONIX SPEED KING AUTOEIRE 198 RADAR MISSION … 229 
LES CHEVALIERS ……….142/192 RACE DRIVING au 105/155  TRAFFIC CB... 189 MATHS 4e. 170198 ONIX THE NAVIGATOR 142  RESCUE PRBOBLETTE 229 
Dynasty Wars + Black Tiger + Sirider  RAMPARTS …….. 106/155 TRAFFIC EMISSION 249 MATHS 5e -170199  Kico THE BOSS 169 ses 
+Ghouls N'Ghoust MATHS 6e ..… 170/199  WICO ERGOSTICK . 239 
5 R.B.I1.2 £ ….105/155  TRAFFIC SWL ser 240) WICO ERGOSTICK …… 199 229 
COLLECTION N°2 239 MATHS CP .. 170/199  WICO 3 WAY . nue 269 
D Beach volley + W REVELATION su 97/145 HORLOGE ASTRALE 325 22 
ragon ninja + Beach volley + Wec MIROIR ASTRAL 295 MATHS CE ne 170/199  MANTA-RAY 129 SIDE POCKET 
le mans + B.Bobble + Wonderboy + RICK DANGEROUS 2 97/155 - see MATHS CM 199/250  STING-RAY 149 E 229 
Arkanoid2 + Renegade + Matchday 2  ROBOCOP 2 PORTRAIT ASTRAL 295 see étre b Ë SKATE OR DI 229 
È pret ester +Super sprint + SHADOW DANCER 105/155  PREVISIONS ASTRALES 5365  “OATHO CM sms .199 7 Y-IKTS SNA CR ENARES À 255 
ying Shar SHERMAN M4 165/225 LE TAROMANCIEN …............ 290 GENERATION 5 ADAPT.NOUVEAU BUS CPC …. 125 ë 
STARS D'HOLLYWOOD … 142/192 GRAPHOLOG Go) DOUBLEURDE JOYSTICK 49 SOLAR STRIKER 229 
Batman 1ndv M SIM CITY …. 145/195 ss sur. 690 DESTINAT. MATHS CE 1/2 …. 235 SOLOMON'S CLUB : 229 
y Action + Robocop + DOUBLEUR DE BUS Sestsssote 159 
Ghostbusters 2 SKULL +CROSSBONES …… 97/145 MICRO CLUB 99F DESTINAT. MATHS CM 1/2.....235 CABLE IMPRIMANTE 149  SPARTANX........ 229 
LES GEANTS DU SPORT..192/259  SLIDERS DE. DESTINATION MATHS 6/5e 235  RALLONGE ECRAN/CLAVIER 149 SEE ER LAND 
Kick off + Great courts + TT Race + SPIRIT OF EXCALIBUR … 105155 N°1 - ARKANOID 1+2 4 SAISONS DE L'ECRIT CE/CM 235 RALLONGE ECRANCLAVIER + 149  SNORD TE : 
Football Manager 2 + 3D Grand Prix STAR CONTROL 105/155 N°2 - GAUNTLET 1+2 4 SAISONS DE L'ECRIT 6/3e 235 CABLE EXTENSION JOYSTICK .49 TEENAGE M TÜRTLE NINJA 
+ Emelyn Hugues + Bobsleigh SUPER MONACO GP 105/145 N°3 - OUT RUN +ROAD BALSTER SECRET ENGLAND 6/5e 249 CABLE FD 1 mere 189 TETRIS 
LES BÂTTANTS 182/235 ie N°4 _- END.Racer +SUPERHANGON PL CABLE MAGNETO CASSETTE … 49 5 
Rick Dangerous +Savage+l. Warriors SUPER OFF ROAD RACER 105/145 Re Ce L SECRET ENGLAND 4/3 249 CABLE MINITEL CPC … “58  IWINBEE 
+ Commando + Frank Bruno Boxe + _ SUPER SKWEEK …. 145/195 N°5 -IK4YIE AR KUNG FU DEUTSCHES GEHEMNIS 6/6 .249 CABLE PERITEL CPC 119 MARRORE 
Navy Moves SWAP 195 N°6 - GRYSOR+GREEN BERET DEUTSCHES GEHEMNIS 4/3e .249  RALLONGE (ALIM+VIDEO 464) 109 * 
LES DIEUX DU CIEL …….192/259 SWITCHBLADE .. ..97/145 N°7 - CALIFORNIA +Winter Games  ORTHO CE1/CE2. su 249 CABLE GX4000 à CPC 6128 … 119 
Chuck Yeager + Ace 182 + ATF N°8 - STREET Fighter +Tiger Road ORTHO CM1/CM2 .. 249 
4 é TARGHAN cree 195 
+ Strike Force Harrier +Tomahawk TORTUES NINJA 2 1105/155 N°9 - PLATOON+PREDATOR ORTHO 6/5e assbisses LAO SU = R [e) [1e] M [@) 
Too Br Oh 182248 TENNIS CUP … …… 159/189  N°10- CRAZY Cars+SUPER SPRINT ELUD VTA 
n j N°11 - B.BOBBLE+FLYING SHARK ORTHOGUS 1.CM/6: 245 
+Hard Drivin + Powerdrift THE SEARCH OF SHARLA 125/165 Le 4 7e . 
15 MEGASTAR ……………182/259  THUNDERJAWS ….……… 105/145  N°12- CE OF ACES+INFILTRATOR  ORTHOGUS 2. 6/3e 245 ADAVANCE OCP ART SUTDIO.. 
Navymoves + Exolon + Buggy 2 TOTAL RECALL ….…….. 105/155 N°13- RENEGADE+TARGET REN.  MATHEX CE/CM. 245 IMPRIMANTE DMP 3160 + Protext 
Scan as Te Are TRACKSUIT MANAGER 2 …97/145  N.147 TOP GUAHSLAR FLIGIT MÉTIER SR. 220 LA SOLUTION Textomat +Datamat +Calcomat 
# + Air + Bati °15 - ROLLI UNDER+RYGAI + + 
Scoobidoo + Saboteur + Battle ship +  TURRICAN 2 … 105155  N OÉEINELTES ERXAYGAR  MATHEX 4/3 245 





Ghost & Goblins + Crépuscule Naja ULTIMATE GOLF …. 105/145  N°16- D.THOMPSON+SUOER TEST MATHEX 6/38... 205 JOYSTICK QUICKJOY 5 SUPERBOARD.. 
+ Talisman d'Osiris WRATH OF THE DEMON ..97/145 N°17 - Matchday 2+Basket MASTER PACK REVISION CE/CM ……… 350 LECTEUR CASSETTE + CABLE 
LES FOUS DU VOLANT ……. 175/225 N°18 - WONDERBOY+WIZZBALL PACK REVISION 6/5e 








Ab. ; Buggy HS Res ; RUBANS N°19 - QUARTET+RAMPAGE PACK REVISION 4/3e PORTRAIT ASTRAL … 
con fighter + Aspar GP: Bu? TETE 120 +YPERSPORT:TRACKFIELD P  UerARE 
MONDE DES MERVEILLES 145/195 us les rubans NB les 3 144 N°21. THUNDERBLADE; 1943 LIBRAIRIE DISCOLOGY V.6.0 PLUS 





New Zeland Story + Rainbow Island 

+ Super Wonderboy + Bubble Bobble 
LES FOUS DU FOOT 175/225  CITIZEN 120D 
Emelyn Hugues + Foo ager 2 CITIZEN 120D . 





029 . AUTOFORM BASIC+disc(plus) . 149 

N°22 - Road Blaster + Metrocross 102 PROGRAMMES CPC 135 

. BIEN DEBUTER CPC È 
59 BIEN DEBUTER 6128 PLUS 78 





































[ | " 
99 | REF |par10 | par20 | DISQUETTES 3 
Fighting Soccer +Kick off DMP 2000/3000 : 59 s LIVRE BASIC 6128 PLUS …... 99 « | 
LES JUSTICIERS 2 14616 DMP 2160160 59 Housse complète clavier+écran LIVRE LANGAGE MACHINE 129 | 3 CF2 [175 F|315F| F 7 E* 
hostbusters2+0.Thunderbolt+Cabal 4000 . ( 

LA COLLECTION (15 JEUX)169/239 DPI HOUSSE 8128 bac ETES |3"12DFDD 69F | 130F | 
Arkanoïd + Batman + Rambo +Top HOUSSE 464/6128 CASSETTE D'AZIMUTAGE .…… 119 = so 
Gun+ Crazy cars + Match day + MT 80 HOUSSE DISC FD1 COPY HOLDER . .189 | 5"1/4DFDD| 56F | 105F | «near e0 


Match point, etc. NEC P2+ 
PCW 8256/8512 . 
COMTE STAR NL 10. 
BOITIER DS4OLA : 30x3" STAR LC 10. HOUSSE STAR NL 10 . 


BOITIER JSY 48 : 48x3" CITIZEN SWIFT 24/9 Ge HOUSSE STAR LC 10 . 
BOITIER DD50L : 50x5.25" 119 HOUSSE PCW 8256/8512. 


FILTRE ECRAN 14° 


SUPPORT IMPRIM. 8 .149 Disquettes certifiées 100% garantie à vie.Livrées avec enveloppes plus etiquettes 
SUPPORT MONITEUR 12- 


MOUSE MAT (tapis) 15 
ETIQUETTES DISC 3° les 100 30 | BOITIERS PLASTIQUES 3" ET 3"50 32 F Les Dix | 





HOUSSE DMP 2160/3160 
HOUSSE DMP 4000 ….. 
HOUSSE CITIZEN 120 D. 


.169 
























BON DE COMMANDE FF PRESS ee à tourner à ” [ES JESSICO- BP693 -06012 NICE CEDEX 


GAGNEZ DU TEMPS ! Commandez par 2 9351.61,30 93,97.22,00 PAR MINITEL 3615 CODE JESSICO - OUVERT 7 / 7 -+ 8H à 20 H 


ITR ie éch immédiat Qte Prix Montant | Lie joins un chèque où mandat lettre 1 
L REACURERCIEUEER LOUER 1 QJe paie à réception au facteur + 25F 


Q Je paie par carte bleue et je complète les 2 lignes ci-dessous 


carte bleue | | 











VERRE (OR RS ES CARRE ERA LEE ER RES CE PS LES 








date d'expiration 


NOM rente hé PRENOM 





























. S/TOTAL N° ET RUE , street es RE 

PORT :LOGICIEL JEUX 20F 
IMPRIMANTES + CONSOLES 60F PORT 25 VILLE... arte ASCODE: POSTAL, 11: pu. feat 
ORDINATEURS 120F TOTAL SIGNATURE OBLIGATOIRE 





UTILITAIRES + ACCESSOIRES 25F 


PAIEMENT ETRANGER EXCLUSIVEMENT PAR MANDAT INTERNATIONAL BOUTIQUE A NICE LLYWOOD STAR 8 BD JOSEPH GARNIER 


GARANTIE 1 AN SUR LES LOGICIELS précisez votre ordinateur | joisc_]K7[] 








DISCBASE 199 F 


LE SEUL GESTIONNAIRE ULTRA RAPIDE DE DISQUETTES ! 


* 99 % DES UTILISATEURS DE DISQUETTES TROUVERONT 
QUE DISCBASE EST INDISPENSABLE! è 
DISCBASE EST UN GESTIONNAIRE DE BASE DE DONNÉES 
SPECIALISÉ DANS LE CLASSEMENT, LA RECHERCHE DE 
DISQUETTES ET DES FICHIERS QU'ELLES 
CONTIENNENT.POUR CONSTRUIRE VOTRE BASE DE DON- 

| NÉES VOUS N'AVEZ QU'À INSÉRER VOS DISQUETTES 

| DANS LE LECTEUR, LES UNES À LA SUITE DES AUTRES ET 
LE PROGRAMME LIRA ET ENREGISTRERA LEUR 
CATALOGUE.VOUS POUVEZ DONC RECHERCHER ET 

RETROUVER EN MOINS D'UNE SECONDE LA DISQUETTE 

DANS LAQUELLE SE TROUVE UN FICHIER 

PLUS DE PAGAILLE, PLUS DE TEMPS PERDU EN 

RECHERCHES INUTILES ! 

— nu | * JONGLE COMME UN CHAT AVEC LES CATS *MET À JOUR 


Gagnez de l'argent ! faites comme AiSre ENTIÈREMENT LES DISQUETTES ET LES FICHIERS 
les pros, utilisez le meilleur logiciel “IMPRIME LES LISTES ET CATALOGUES 

de création de jeux. 

SPRITE ALIVE DISC ….349 F 


SI VOUS VOULEZ RÉALISER VOS PROPRES JEUX AYANT UN 
ASPECT PRO 

C'EST SPRITES ALIVE QU'IL VOUS FAUT 

* BASIC SIMPLE * DETECTEUR DE COLLISIONS VRAIES. 

* MOUVEMENT SOUPLE PIXEL PAR PIXEL 

* COMPATIBLE SOURIS, JOYSTICKS, CLAVIER. 

* 23K DE MÉMOIRES PROGRAMMÉES 

* 64 SPRITES SUPER-CHOUETTES * MODE LABYRINTHE 
AUTOMATIQUE. 

* COMMANDES AUTOMATIQUES DE MISSILES. 

* 70 COMMANDES SUPPLÉMENTAIRES EN BASIC 

* PUISSANT, HYPER RAPIDE GRACE AU COMPILER. 

* 6 PROGRAMMES DE DÉMO BASIC.+ 2 DE DÉMO COMPILER. 


GRAPH-MASTER 


CREATION DE 10 TYPES DIFFERENTS DE DIAGRAMMES! 




























*HISTOGRAMME *HISTOGRAMME ANNUEL *HISTOGRAMME 
ANNUEL 3D ‘DIAGRAMME PIE *DIAGRAMME DES TEMPS 
*DIAGRAMME DE FONCTIONS COMPLEXES GRAPHIQUE 
EN LIGNES ‘GRAPHIQUE EN BARRES * BAR GRAPHS 
COMPARATIFS * 

IL Y À 6 PROGRAMMES DE BASE SUR LE MENU PRINCIPAL 
D'OÙU TOUS LES AUTRES SONT SÉLECTIONNES 
INCONTESTABLEMENT LE GRAPHEUR LE PLUS 
COMPLET,LE PLUS PUISSANT SUR CPC 

IDEAL COMPAGNON DES MATHEUX DE BAZ ET DE LA FAC 
AINSI QUE POUR LE MONDE DES AFFAIRES. 








KWIKFILE cnnnnnnnnnee 199 F 


UN PUISSANT GESTIONNAIRE DE DONNEES, POUR LE 
PRIX D'UN SIMPLE JEU ! 


| UNE BASE DE DONNÉES À FAIBLE PRIX POUR UNE 

| MANIPULATION RAPIDE ET AISÉE DE FICHIERS DE 
DONNÉES : 
CARACTÉRISTIQUES : UTILISATION À 100% PAR MENU 
* JUSQU'À 19 RUBRIQUES PAR ENREGISTREMENT * TOTAL 
DES RUBRIQUES * LONGUEUR DE TOUS LES CHAMPS DE 
VARIABLES ‘28 CARACTÈRES PAR RUBRIQUE(PLUS POSSI- 
BLE MAIS PAS AFFICHÉ) * JUSQU'À 22000 OCTETS PAR 
CHAMP * TRI ALPHA-NUMÉRIQUE SUR TOUS LES CHAMPS * 
RECHERCHE RAPIDE PAR TOUCHE QUI AFFICHE SUR 
L'ÉCRAN TOUS LES ENREGISTREMENTS CONTENANT LES 
DONNÉES DÉSIRÉES * IMPRESSION DE TOUTES LES RUBRI- 
QUES DANS N'IMPORTE QUEL ORDRE ‘RÉPONSE AVEC OÙ 
SANS NOM DE CHAMP * CALCULS DANS LES RUBRIQUES 
(IDÉAL POUR TENUE DE STOCK...) POSSIBILITÉ DE CHAN- 
GER DE FORMULE DE CALCUL DANS TOUTE RUBRIQUE ET 
D'EN AJOUTER * CATALOGUE DE FICHIERS GÉRÉS PAR 
MENUS 


MAXAM  ASSEMBLEUR-DÉSASSEMBLEUR 
ASSEMBLEUR-DÉSASSEMBLEUR, SYSTÈME COMPLET DE 
DÉVELOPPEMENT DU Z 80. 

LE NEC + ULTRA DU PROGRAMMEUR 

MENU DÉROULANT : LOAD, MERGE, SAVE, PRINT, FIND 

| REPLACE, ETC 

ROM : 399 F 














CASSETTE : 275 F DISC : 275 F 





C0) Ê Ü - ne . É 


EMAIL LL LLC LL LL LL LL LL LL D LL tnt dd 
















REPRODUISEZ DES IMAGES GRACE AU SCANNER DART 


UN OUTIL REMARQUABLE DE REPRODUCTION D'IMAGES, DOCUMENTS DESSINS, PHOTOS, ETC. , é 
COMPATIBLE: AVEC * DMP 2000/2160/3000/3160° AMX PAGEMAKER, SOURIS ET CRAYON." CPC DISK OU CASSETTE ( À PRÉCISER) 
DESCRIPTIF : AGRANDISSEMENT X1 - X2 - X3 - X6 * ZOOM * PRINT * LOAD * SAVE * COPY * EDIT * RAJOUT DE TEXTE * 1 OU 2 ECRANS 
IMPRESSIONS DEMI OÙ PLEIN FORMAT * ROTATION ECRAN DE 180° 





"L'ATELIER DE L' ARTISTE" THE ADVANCED OCP ART STUDIO 245 F 
|  OCP VOUS PERMET DE CREER UNE IMAGE, DE LA REDUIRE, AGRANDIR, COUPER, COLLER, INCLINER,COLORIER GRACE 


AUX 8 PISTOLETS, 16 PINCEAUX ET BROSSES À PEINTURE INCORPORÉS, PROJECTION D'OMBRES ET DE FONDS POSSIBLE. 
SACRÉ MEILLEUR LOGICIEL DE DESSINS ET GRAPHISMES SUR CPC. 


SUPER-PROMO 695 F 
COMPRENANT : THE ADVANCED OCP ART STUDIO + UNE SOURIS GENIUS MOUSE + UN TAPIS SOURIS + UNE 





LL 





QE cop 


es 
NN (AUE 


SOURIS HOUSE + UNE INTERFACE SOURIS 












SI VOUS SOUHAITEZ GELER UN PROGRAMME , LE COPIER 
ENSUITE SUR DISQUETTE OU CASSETTEAUTOMATIQUEMENT 
EN APPUYANT SIMPLEMENT SUR UN BOUTON, LA SEULE ET 
UNIQUE SOLUTION C'EST MULTIFACE 2. A 
D'UNE UTILISATION SIMPLE À LA PORTÉE DE TOUS, GUIDÉ 
PAR UN MENU DÉROULANT 
APRÈS AVOIR LANCE LE PROGRAMME, VOUS POURREZ 
LE STOPPER , LE SAUVEGARDER OÙ ENCORE L'ÉTUDIER 
ET LE DÉTAILLER À VOTRE CONVENANCE, GRÂCE AU 
MULTI - TOOLKIT INCORPORÉ DANS MULTIFACE 2. 
EN APPUYANT SUR RETURN OÙ EN LE RECHARGEANT LA 
FOIS SUIVANTE IL REPRENDRA AUTOMATIQUEMENT, DEPUIS 
L'ENDROIT OÙ VOUS L'AVEZ GELE 
.495 F 


MULTIFACEZ2 + CPC 464/6128 
MULTIFACEZ2 + CPC 464/6128 PLUS … .525 F 








THE INSIDER 149F 


L'INDISPENSABLE COMPAGNON DU MULTIFACE 2 
VOULEZ-VOUS TOUT CONNAÎTRE À L'INTERIEUR D'UN PROGRAMME ! 
BRANCHEZ THE INSIDER, avec MULTIFACE 2, LANCEZ UN PROGRAMME, 
GELEZ-LE ET ALORS THE INSIDER VOUS RÉVÉLERA TOUT : IL DÉSASSEMBLE 
COMPLÉTEMENT, CHERCHE ET TROUVE TEXTES ET CODES, AFFICHE ET MO- 
DIFIE RAM ET REGISTRES DU Z 80, /MPRIME. 


KRVNVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVRQKN 


VIDI capte et transfère plus de 6 images /sec. 


directement de votre magnétoscope, caméra, télé 






























LL TO EL IL ET CIS 
















Sauvegarde sur cassette ou disquette 
Traÿaille/en MODES 0, 1 ou 2 

16Ko de mémoire vidéo additionnelle 
Contrôleur d'images incorporé 
Compatible 
Livré avec câble RCA, BNC + câble PERITEL 


OCP ART STUDIO 









PAGE PUBLISHER PAO: 325 F 


+ PUBLICATION ASSISTÉE PAR ORDINATEUR 6128 

+ CRÉEZ TRES FACILEMENT VOS DOCUMENTS, POSTERS, 
PETITS JOURMAUX, LOGOS, FANZINES, ETC... 

* PAGE PUBLISHER P.A.O. PERMET LE CONTRÔLE, AUSSI 
BIEN DE L'IMPRESSION QUE DU GRAPHISME 

+ COMPATIBLE TOUTES IMPRIMANTES MATRICIELLES, EPSON, 
DMP 2160/3160 

* GÉRÉ PAR ICONES ET MENUS, PAGE PUBLISHER P.A.O. 
PEUT ÊTRE PILOTÉ PARC CLAVIER OU JOYSTICK 

* RECONNU COMME LE N°1 DE LA MICRO EDITION PAR LA 
PRESSE EN GB POUR SON RAPPORT QUALITE/PRIX 
PAGE PUBLISHER PICTURE DISC 











PROTEXT TRAITEMENT DE TEXTE 


METTEZ AU PLACARD TOUS VOS TRAITEMENTS DE TEXTE, 
PROTEXT ARRIVE !! 

SANS AUCUN DOUTE LE MEILLEUR TRAITEMENT DE TEXTE 
SUR CPC, RECONNU COMME LE N° 1 PAR TOUTE LA PRESSE 
INFORMATIQUE. 

COMPLET, PUISSANT, HYPER RAPIDE, D'UTILISATION TRÈS 
FACILE. COMPATIBLE TOUTES IMPRIMANTES. 

ROM : 399 F CASSETTE : 295 F DISC : 349 F 








SUPER PROMO 


IMPRIMANTE STAR LC200 COULEUR + DRIVER 2525 F 
IMPRIMANTE STAR LC200 COULEUR + DRIVER 


+ ADVANCED OCP ART STUDIO 
DRIVER IMPRIMANTE COULEUR (LC10 OU LC200) 
“ce driver permet d'imprimer toutes les images couleurs du CPC 
vers votre imprimante( LC10 ou LC200 exclusivement) 















THE MUSIC MACHINE 595 F 


“PERMET DE COMPOSER DE LA MUSIQUE, SAUVEGARDER, 
EDITER, CHARGER, SONS, RYTHMES ET INSTRUMENTS 

* C'EST AUSSI UNE CHAMBRE D'ECHOS AVEC PLUSIEURS 
EFFETS. THE MUSIC MACHINE SERT EGALEMENT DE 
BATTERIE, 8 TONALITES DE DRUM, SONT PROGRAMMÉES, 
MAIS ON PEUT EN REPRODUIRE D'AUTRES 

* COMPATIBLE 100% MIDI * SORTI HIFI + MICRO 

* DISQUETTE OU CASSETTE 











PORTRAIT ASTRAL 295 F 


CET ANEMENE LE MEILLEUR LOGICIEL D'ASTROLOGIE 
RÉALISÉ PAR LE PLUS GRAND ASTROLOGUE FRANCAIS. 
PORTRAIT ASTRAL VOUS ENCHANTERA ET VOUS 
PERMETTRA DE MIEUX VOUS CONNAITRE. 

THEMES ASTRALS - HORLOGES ASTRALES - PLANETES 
ASTRALES ETC,ETC..... 








AUGMENTEZ LA MEMOIRE DE VOTRE CPC ! 


; AVEC DK'TRONICS 
EXTENSION MÉMOIRE 64K POUR CPC 464/664 ……… 499 F 








EXTENSION MÉMOIRE 256K POUR CPC 6128 1090 F 
CRAYON OPTIQUE CASSETTE PA shiponescs225:P 
CRAYON OPTIQUE DISQUETTE .…… .325 F 


EXTENSION MEMOIRE: AUGMENTE DE 64 K OU 128 K LA 
CAPACITÉ MÉMOIRE DE VOTRE CPC. : 
CRAYON OPTIQUE : PERMET D"EXPLOITER LES CAPACITÉS 
GRAPHIQUES DU CPC. 



















LECTEUR 3.50/ 800 K POUR CPC 


INDISPENSABLE POUR LES USAGERS AYANT BESOIN DE 
CAPACITÉ DE STOCKAGE 800 K * 80 PISTES * DOUBLE FACES. 
POUR L'UTILISER PLEINEMENT IL EST NÉCÉSSAIRE D ‘AVOIR 
UN DES 3 LOGICIELS SUIVANTS RODOS * ROMDOS * RAMDOS 
* ROMDOS ET RAMDOS SONT DEUX LOGICIELS IDENTIQUES 
SAUF QUE ROMDOS EST EN ROM ET NÉCÉSSITE 
L'UTILISATION D'UN ROMBOARD POUR SON INSTALLATION, 
COMME RODOS. 

*RAMDOS EST LIVRÉ EN DISQUETTE. ILS SONT TOUS 
COMPATIBLES AVEC AMSDOS, CPM 2.2 ET CPM + 

* RODOS LIVRÉ EN ROM EST LE PLUS COMPLET, IL OFFRE 
PLUS DE 50 COMMANDES SUPPLÉMENTAIRES, CONFIGURE 
AUTOMATIQUEMENT LE DRIVE B, OFFRE UN SILICON DISK, 
UN BUFFER D'IMPRIMANTE, L'ACCÈS DISK EST 3 FOIS PLUS 
RAPIDE, COMPATIBLE AVEC AMSDOS, IDÉAL POUR LES 
UTILISATEURS EXPÉRIMENTÉS. 

CEPENDANT Si C'EST UNIQUEMENT LE STOCKAGE QUE L'ON 
RECHERCHE NOUS VOUS CONSEILLONS ROMDOS OÙ 
RAMDOS 

LECTEUR 3.50 + ROMDOS 


[ 
! 
à 


RP RER ONE SES PR ARE EST RES RS RER PER SERRE RE EU RP EEE PE EC 











JEU DES 


PETITS CHEVAUX 


(2ème partie) 











bATIAR' Te]: 141 


Valable pour CPC 664 - 6128 


Les listings suivants contiennent un jeu à l'ambiance torride et 
qui a fait les beaux jours de Macao : les petits chevaux. 
A vous l'enfer du jeu ! 
Le mode d'emploi se trouve dans le numéro précédent. 


DATAS 4 . BAS 
(suite) 


1599 DATA FF,85,4F,0F,8F,4B,3F,3F,6B,9F, 3D,3F,6F,9F, D, 4BB 
1698 DATA 4F,9F,4F,9F,4F,6F,4D,8F,2C,9C, 4D,CB,9C, 8C, 49, 3A7 
1619 DATA 9F,8F,9F,D5,91,95,FF,EA,C9,C5, 4B,9C, OC, 49, EB, 68D 
1628 DATA CI,ER,3F,3F,6B,4F,9F,8F,1F,CA,BF,D5,FF, AF,9F, 7BC 
1638 DATA 4F,8F,97,3F,3F,6B,CF,3D,3F,6F,6F, 4D,9F,CF,CF,6A1 
1649 DATA 9F,8F,9F,9D,CF,2C,9C,9D,4B,0C, 90, BC, 87, 8F,9F, 262 
1658 DATA CA,91,95,FF,C9,85,9F,66,9C,9C, 49,EB,C1,EB,3F,6E9 
1664 DATA 3F,3F,C7,CF,6F, 4A, 4A,EA,6A,FF,85,4F,4F,8F,97, 7D3 
1679 DATA 3F,3F,6B,6F,9F,4F,9F,6F,4D,4F,CF,0F,4F,8F,4F,51B 
1689 DATA 4D,CF,9F,9F,6F,4B,9C,9C,9C, C7,9F,9F, 4A,81,95,36D 
1699 DATA FF,C9,C5,9F, 86,40, ÿC, 49,EB,C1,EB, 3F, 3F, 3F,87, 755 
1798 DATA 9F,0F,4F,7F,FF,DS,FF,91,94,9F,97, 3F,3F,6B,0F, 562 
1719 DATA 4F,9F,9F,0F,0D,8F,9F,0F,6F,9F,0F,0D,01,94,9F, 184 
1728 DATA 4B,4C,9C,9C,C7,8F,CF,9F,C8,91,94,FF,85,8F,4F,54A 
1739 DATA 86,89C,9C,49,EB,C1,EB, 3F,3F,3F,87,CF,9F, 4F, 7F,66E 
1749 DATA FF,BF,FF,9F,6F,9F, 4B,3F,3F, 3F,6B,CF,3C, 3C, 6D, 691 
1759 DATA CF,91,97,8C, 4D, 4F, 3C, 3C, 2D, CB, 4C, 4C, 9C, 49,9F, 36B 
1769 DATA 9F,9F,4A,FF,FF,EA,FF,85,4F,4B,9C, 8C, 9C, 49,EB,6C6 
1778 DATA C1,EB,3F,9F,3F,6B,6F,4F,9F,95,D5,BF,EA, 9F,8F,6F2 


1789 DATA 6F,4B,3F,3F,3F,6B,9F,3D,3F,6F,4F,91, 87, 0C, fD, 36C 
1799 DATA 8F,2C,8C,8D,CB,9C, 8C, BC, 49,CF,CF,8F,9F,C8,FF,697 
1899 DATA CG,FF,65,9F,4B,9C,9C,9C,49,EB,C1,EB,3F,9F,3F,65F 
1819 DATA 6B,6F,4F,9F,95,D5,BF,AF,CF,8F,6F,CB,3F,3F,3F, 7A5 
1829 DATA 6B,4F,3D,3F,6F,CF,9D,CF,@F,CF,CF,9F,CF, 4D, 0F,637 
1839 DATA 2C,8C,9D,CB,8C,9C, 9C, 49,91,94,0F, 4A,EA, 4A,FF, 49E 
1849 DATA 85,4F,CB,9C,9C,9C, 49,EB,C1,EB,3F, 3F,3F,68B,CF,69A 
1859 DATA 8F,9F,EA,FF,BF,85,9F,6F,9F,97,9F,3F,3F,68,0F,5C6 
1869 DATA 3D,3F,6F,4F,9D,8F,0F,4F,4F,CF,6F,QD,9F,2C,9C,435 
1879 DATA 4D,CB,81,94,8C,C7,CF,DF,0F, 4A,EA, 4A,EA, 0F,0F,563 
1884 DATA 86,8C,4C,9C,49,E8,C1,EB,91, 94, 3F,C7,9F,CF,EA,65D 
1899 DATA EA,EA, 2F,8F,9F,9F,97,3F,3F,3F,6B,6F, 3D,3F,6F,5E9 
1998 DATA CF,9D,CF,4F,9F,4F,CF,CF, 4D, 4F,2C, 0C, 4D,CB,91,5E3 
1919 DATA 94,9C,C7,4F,9F,9F, 4A,EA, GA, EA,9F, 4F,86,9C, 9C, 4AB 
1928 DATA 9C,49,EB,C1,EB,91,94,3F,C7,6F,9F, EA,ES,FF,2F, 76D 
1939 DATA 8F,4F,CB,91,94,3F,6B,CF, 3D, 3F,6F,9F, 4D,9F,8F, 48C 
1948 DATA CF,CF,CF,8F,9D,CF,2C,9C,4D,CB,91,84,9C, 49,8F,611 
1959 DATA F,6F,4A,EA, 4A,EA,9F,CB,91,84,0C, 49,EB,C1,EB,6D1 
1968 DATA 91,94,3F,6B,68F,9F,C4,FF,EA, 8F,8F,0F,4B, 01,04, 4F3 
1979 DATA 3F,6B,9F,3D,3F,6F,8F,9D,4F,4F,9F,0F,9F,CF, 4D, 427 
1989 DATA 8F,2C,9C,9D, CB, 91,94,9C,49,8F,CF,4F, 4A, 65, 4A, 4BF 
1999 DATA 85,CF,4B,91,84,0C, 49,EB,C1,EB,91,04,3F,6B,8F,5CE 
2999 DATA 4F,5F,FF,EA,9F,9F,9F,97,91,94,3F,68,CF, 3D,3F,555 
2918 DATA 6F,6F,4D,9F,CF,CF,6F,CF,CF,9D,CF,2C, 0C, 4D, CB, 751 





2829 DATA 81,05,0C,C7, CF, DF, 4A,85, 44,85, 0F, 86,41, 44, AC, 3FB 
2939 DATA 49,EB,C1,EB,01,05,93F,87,6F,44,FF,AF, 4F,8F, CB, 7DC 
2948 DATA 97,41,04,3F,6B,0F,8F,0F,CF,9F,9D,4F,4F,4F,BF, 3DA 
2988 DATA 4F,6F,4D,0F,4F,0F,4F,CB,91,05,0C,C3,4F,CF, AA, 4EF 
2968 DATA 4F, 44,85, 4B, 86,01, 94,00, 49,EB,C1,EB,01,05,3F,525 
2978 DATA C3,0F,0F,D5, AF,4F,6F,48,91,95,5F,6B, CF, 6F,0F,5AB 
2980 DATA 8F,0F, 4D,4F,CF, CF, 8F,0F,0F, DD, CF,CF,8F,0F, B, 599 
2998 DATA 91,85, 0, 49,8F,4F,0F,4F, 4A,4F,CB, 01,95, 0C, 49, 356 
2194 DATA EB,C1,EB,91,95,3F,68,87,8F,0F,8F,0F,F,97,01,531 
2119 DATA 05,3F,6B,8F, 3C, 3C, 6D,8F,91,97,0C, 4D,CF, 30, 3C, 454 
2124 DATA 2D,48,01,96,0C,87,9F,0F,CF, 4F,4F,86,01,85, 0C, 335 
2139 DATA 49,EB, C1,EB, 01,06, 3F,6B, 87, CF, CF,8F, C3, 01,06, 7F 
2148 DATA 3F,68,0F, 30, 3F, 2F,0F,01,47,0C, 9D,F, 2, 4C, AD, 1EB 
2159 DATA 4B,01,06,0C, 49,87, CF, CF, 8F, C3, 01,06, C, 49, EB, 565 
2168 DATA C1,EB,91,07,3F,C3,4F,8F,4B,07,01,06,3F,6B,CF,5F6 
2178 DATA 3D,3F,6F,CF,0D,CF, 4F,BF,CF, BF, CF, 4D, UF, 2C, DC, 635 
2186 DATA AD, CB, 01,97, 4C,C3, 4F, BF, 48, 86,91, 06, UC, 49,EB, 4A5 
2194 DATA C1,EB,91,08,3F,C3,C3,07,01,07,3F,6B, 0F, 30, 3F,54E 
2299 DATA 6F,4F, 4D,6F,6F,0F,6F,0F,F, 0D, 6F, 2C, AC, 4D, 4B, D! 
2219 DATA 91,08,8C,C3,C3,686, 91,87, 0C, 49,EB,C1,EB, 01, 12,528 
2224 DATA 3F,6B,4F,3D,3F,6F,CF,0D,CF,9F,CF, CF, BF, CF, 4D, 667 
2239 DATA 9F,2C,4C,0D, CB, 01, 12,0C, 49,EB,C1,EB, 91, 12,3F, 478 
2244 DATA 6B,0F,3D,3F,6F, 4F, 0D,6F,0F,4F,4F,CF,F, 80, 0F, 3F7 
2254 DATA 2C, BC, 4D,CB, 81,12, 8C, 49, EB,C1,EB,91,13,C3,8F,5B5 
2268 DATA 3D,3F,6F,CF, 4D, CF, 4F,0F,4F,CF, CF, 4D,4F, 2C, 80, 5B5 
2279 DATA 9D,CB,81,13,C3,EB,C1,EB,91,13,C3,CF, 30, 3F,6F, 6D7 
2286 DATA 0F,0D,0F,91,04,CF,6F, 6D,CF, 2, 0C, 4D,CB, #1, 13, 49E 
2299 DATA C3,EB,C1,EB,01,16,8F,4F, BF, 4D,4F,6F,0F,9F,0F,5B6 
2390 DATA CF, 4D,6F,0F,0F,0F,6F,01,12,4F,4B,EB,C1,EB,0F,57A 
2319 DATA 1F,3F,3F,2F,CF,CF,6F,CF,CF,0F,4F, CF,8F, CF,CF, 7F1 
2328 DATA 0F,0F,4F,CF, CF, 4F, CF, BF, 4D,0F,CF,CF,8F, CF, CF, 7DF 
2339 DATA 8D,CF,CF,6F,CF,CF,0F,0F,4F,CF,CF, 4F, CF, 6F,4F, 7DF 
2349 DATA CF,CF,4F,CF,6F, 4F,CF,4F, 4F, CB, EB, C1,EB, 8F, 1F, 897 
2359 DATA 3E,3E,6F, 3C, 3C, 2D, 3C, 3C, 6D, 3C, 3C, 2D, 3C, 3C, 6D, 3FF 
2364 DATA 3C, 3C, 20, 3C,3C, 6D,9F, 01,97, 6, 4D, BF, 30, 3C, 6D, 2EE 
2374 DATA 30, 3C, 2D, 30, 3C, 2D, 3C, 3C, 2D, 3C, 3, 2D, 3C, 3C, 2D, 339 
2389 DATA 3C,3C, 2D,6F,4B,EB,C1,EB,9F, LF, 3D, 30, 2F, 30, 3F, 569 
2399 DATA 2F,9D,3F, 2F,3D,3F, 2F, 30, 3F, 2F, 3D, 3F,6F, 30, 3F, 397 
2499 DATA 2F,0F,91,97,0C, 6D,CF,2C,9C, BD, 2C,C, BD, 20, BC, 1FA 
2419 DATA 4D, 20, 0C, 4D,2C, 4C, 8D, 20, 0C, D, 2C, AC, OD, OF, 4B, {BE 
2429 DATA EB,C1,EB,0F,1F, 86, 3E,6F, 30, 3F, 2F, 30, 3F,6F, 30, 583 
2439 DATA 3F,2F, 90, 3F,6F, 30, 9F, 2F, 9D, 3F,2F,6F, 4D, 4F, CF, A9 
2449 DATA 0F,CF,BF,4F, 4D, CF, 2C, #0, OD, 20, 0C, OD, 2C, AC, 4D, 3E7 
2459 DATA 20, 4C, 8D, 2C, AC, 4D, 2C, GC, 8D, 2C, 8C, 0, 6F, 4B, EB, 319 
2464 DATA C1,EB,9F, 1F, 80, 3D, 2F, 30, 3F, 2F, 30, 3F, 2F, 30, 3F, 455 
2a74 DATA 2F,8D,3F,2F, 30, 9F, 2F, 30, 3F, 2F,0F, 0D, 91, 06, 0F, 262 
2484 DATA AD, 0F, 2C, 0C, 4D, 2C, 4, 8D, 2C, 8C, 4D, 20, BC, D, 2C, 19C 
2499 DATA OC, 4D,2C, 4C,4D, 2C, AC, 6D, BF, aB,EB, C1,EB, CF, OF, 5C2 
2586 DATA 3E,9E,6F, 9D, 3F,6F, 30, 9F,6F, 30, 3F, 2F, 30, 3F,6F, 457 
2518 DATA 3D,3F,6F,9D,3F, 2F,0F, 90, 4F, 4F, BF, CF, BF, CF, 4D, 559 
2524 DATA 4F, 20, 80, 6D, 20, OC, 8, 20, 0, 4D, 2C, BC, 6D, 2, EC, 1DB 
2539 DATA 4D, 2, C, 4D, 2C, AC, 0D,8F,4B,EB, C1,EB, 0F, 1F, 3D, 473 
2548 DATA 3D,2F, 3D,3F,2F, 3, 3F, 2F, 30, 3F, 2F, 30, 3F, 2F, 30, 355 
2554 DATA 3F,2F,3D,9F,6F,4F, 40, 6F,8F,0F, 6F,UF,6F, 0D, 6F, 4EB 
2568 DATA 2C,C, 9D, 20, 8C, 4D, 20, GC, 4D, 20, 8C, 4D, 2C, BC, 4D, 259 
2574 DATA 20, 0C, 8D, 20, C, 0D, 0F, 4B, EB,C1,EB, CF, OF, 3E, 3E, 565 
2584 DATA 6F,3D,3F,6F, 30, 6F,6F, 30, 9F, 2F, 3, 3F,6F, 3D, 3F, 457 
2598 DATA 2F,9D,3F,2F,CF, 0D,8F,9F,CF,CF,0F, CF, 4D,4F, 2,558 
2698 DATA 8C, 0D, 2, 0C, 4D, 20, 8C, 4D, 2C, 8C, 4D, 2, 8C, BD, 20, 219 


2619 DATA @C,BD,2C,8C, 9D,8F,4B,EB,C1,EB,CF,9F, 3D, 3D,2F,5E6 
2629 DATA 3D,3F,6F,3D,3F,2F,3D,3F,6F, 3D,3F,2F, 3D, 3F,2F, 3D7 
2639 DATA 3D,3F,2F,8F,9D,9F,8F,4F,4F,CF,6F,9D,9F, 2C,9C, 335 
2649 DATA @D,2C,4C, 8D, 20,80, 8D, 20, 90, 4D, 20, AC, BD, 2C, AC, 199 
2659 DATA 4D,2C,8C,8D,8F,4B,EB,C1,EB,CF,9F,3F,3F,6F,4F, 6AD 
2669 DATA 9F,4F,CF,CF,CF,4F,9F,9F,91,94,CF,8F, OF, UF, BF, 4CB 
2679 DATA 4F,8F,9D,4F,4F,9F,4F,CF,CF,4D,91,94,9F,CF,DF, 4Ca 
2689 DATA 9F,8F,8F,4F,9F,8F,CF,6F,6F,9F,CF, 91,04, 8F, 9F, 588 
2699 DATA 9F,4E,EB,C1,EB,CF,CF,CF,6F,0F,91,94,CF,6F,9F, 76E 
2790 DATA 91,94,CF,6F,9F,0F,9F,4F,CF,CF,8F,4F,4D,9F,91,478 
2719 DATA 94,CF,8F,9D,0F,CF,CF,CF,9F,0F,8F,4F,CF,CF,CF, 754 
2729 DATA 4F,9F,4F,CF,CF,CF,6F,0F,4F,CF,CF,CF,CB, EB,C1, ER 
2739 DATA EB,0F,9F,0F,CF,4F,6F,UF,0F,9F,CF,4F,91,04,0F,424 
2749 DATA 4F,4F,CF,8F,91,05,9F,91,97,9C, 4D,91,94,0F,4F,2DS 
2759 DATA 4F,CF,CF,0F,9F,0F,CF,6F,CF,9F,9F,9F,4F,CF,8F,621 
2760 DATA CF,9F,9F,4B,EB,C1,EB,UF,9F,CF,4F,@F,CF,CF,BF, 747 
27179 DATA CF,CF,9F,CF,CF,8F,CF,CF,0F,8F,9F,CF,CF,4F,CF, 861 
2789 DATA 9F,91,97,0C,8D,4F,CF,8F,CF,CF,9F,0F,4F,CF,CF, 586 
2799 DATA 4F,6F,CF,4F,CF,CF,4F,CF,CF,4F,6F,4F, 4F,CB,EB, 8B9 
2890 DATA C1,EB,9F,4F,4F,8F,91,06,0F,4F,9F,CF,2F,CF,6F,558 
2819 DATA 4F,CF,6F,UF,8F,BF,CF,UF,6F,4F,9F,4F,CF,4F,8F,6A1 
2829 DATA 4F,9F,4F,9F,4F,0F,9F,0F,6F,0F,68F,8F,CF,8F,BF, 461 
2639 DATA 8F,6F,9F,CF,9F,CF,4F,0F, UF, 4B,EB,C1,EB,91,95,62F 
2849 DATA 8F,891,12,3F,2F,0F,0F,4F,CF,91,04,0F, 91, 12,C8, 283 
2859 DATA 85,4F,CF,0F,4F,4B,EB,C1,EB, UF, 0F,6F,4F,4F,91,5EF 
2864 DATA 12,3F,2F,9F,4F,CF,CF,DF,6F,4F,4F,01,12,C0,85,519 
2879 DATA CF,8F,8F,8F,4B,EB,C1,EB,91,95,9F,2F,0F,0F,2F,5EF 
2884 DATA 9F,8F,6F,0F,9F,2F,9F,0F,2F,9F,9F,2F,4F,9F,2F,291 
2899 DATA 8F,9E,91,04,9C,9F,8F,65,0F,0F,85,9F,0F,85,9F, 2A6 
2999 DATA 0F,85,9F,9F,85,9F,CF,C5,9F,9F,85,0F,8F,F, UF, 439 
2919 DATA 4B,EB,C1{,EB,CF,CF,6F,CF,CF,2F,8F,4F,2F,CF,CF,987 
2929 DATA 6F,8F,CF,2F,8F,4F,6F,68F,CF,2F,8F,CF,6F,8F,8E, ?Cÿ 
2939 DATA 91,84,8C,8F,4F,C5,8F,CF,85,CF,9F,85,8F,CF, 85, 6DD 
2949 DATA 4F,9F,85,6F,CF,85,CF,6F,85,CF,4F,9F,9F,4B,ER,71B 
2958 DATA C1,EB,9F,9F,9F,6F,6F,2F,0F,6F,2F,6F,8F,2F,0F,54F 
296$ DATA 8F,2F,8F,8F,2F,9F,9F,6F,CF,4F,6F,CF,91,06,0F, 59A 
2979 DATA 8F,85,9F,8F,85,8F,CF,C5,4F,8F,C5,YF,4F,C5,4F,GEF 
2989 DATA 4F,C5,8F,0F,C5,CF,4F,9F,0F,4B,EB,C1,EB,CF,CF, 833 
2999 DATA 9F,CF,CF,2F,CF,4F,2F,4F,CF,2F,CF,4F,2F,4F,CF,6E1 
3999 DATA 6F,8F,4F,6F,BF,CF,6F,9F,91,95,0F, 4A,CF,85,CF,GAA 
3919 DATA 4F,85,CF,CF,C5,6F,9F,85,0F,9F,C5,0F,9F,C5,6F,GAF 
3829 DATA 8F,C5,6F,4F,8F,6F, 4B,EB,C1,EB,CF,CF,CF, 6F,8F,93D 
3938 DATA 2F,4F,4F,6F,8F,8F,2F,4F,4F,6F,9F,8F,2F,4F, BF, 4C1 
3044 DATA G6F,CF,6F,6F,1F,9F,4F,4F,4F,CF, 4A,8F,65, 4F,4F,5E2 
3959 DATA C5,6F,CF,C5,9F,8F,85,8F,0F,85,9F,9F,C5,CF,8F, 76F 
3469 DATA C5,9F,8F,8F,6F,4B,EB,C1,EB,CF,CF,CF,8F, 0F,2F,89D 
3078 DATA CF,CF,6F,8F,9F,2F,CF,CF,6F,6F,CF,6F,6F,4F,6F,891 
3980 DATA 8F,CF,2F,1F,9F,9F,CF,CF,CF, 4A,9F,C5,CF,CF,C5, 7B8 
3099 DATA 6F,9F,85,0F,4F,C5,CF,8F,85,CF,4F,C5,CF,8F,C5,82F 
3190 DATA 9F,4F,CF,CF,CB,EB,C1,EB,9F,8F,3C, 3C, 6D, 2F,0F,69F 
3119 DATA 9F,2F,4F,4F,2F,0F,9F,2F,4F,4F,6F,6F,9F,2F,8F,3C1 
3129 DATA 4F,2F,9F,4F,8F,9F,9F,0F,4A,4F,85,9F,0F, 85, 4F, 438 
3139 DATA 9F,85,8F,0F,85,9F,9F,85,6F,CF,C5,6F,9F,85,3C,5DC 
3149 DATA 3C,2D,8F, 4B,EB,C1,EB,8F,@F, 3D,3F,2F,2F,CF,6F, 639 
3159 DATA 6F,CF,8F,6F,CF,8F,6F,CF,4F,6F,CF,CF,6F,4F,4F,7C1 
3169 DATA 2F,1F,9F,CF,CF,8F,CF, 4A,8F,C5,CF,8F,C5,CF,9F, 7F8 
3179 DATA 85,9F,CF,C5,4F,CF,85,4F,CF,85,CF,8F,85,68,C9,879 
3189 DATA CS5,CF,CB,EB, C1,EB,9F,9F,3D,3F,6F,2F,4F,9F,6F,6FB 
3199 DATA 9F,4F,2F,4F,0F,6F,9F,4F,6F,8F,6F,2F,0F,6F,6F,481 


328$ DATA 
3218 DATA 
3229 DATA 
3239 DATA 
3249 DATA 
325 DATA 
3264 DATA 
327% DATA 
3289 DATA 
3294 DATA 
3380 DATA 
3319 DATA 
3324 DATA 
3339 DATA 
3344 DATA 
3359 DATA 
3364 DATA 
3374 DATA 
3384 DATA 
3399 DATA 
34ÿ@ DATA 
3419 DATA 
3424 DATA 
3439 DATA 
3449 DATA 
3458 DATA 
3469 DATA 
3479 DATA 
3484 DATA 
3499 DATA 
3589 DATA 
3518 DATA 
3524 DATA 
3539 DATA 
3549 DATA 
3559 DATA 
3564 DATA 
3574 DATA 
358% DATA 
3594 DATA 
3699 DATA 
3618 DATA 
3624 DATA 
3639 DATA 
364$ DATA 
3659 DATA 
3664 DATA 
3679 DATA 
3684 DATA 
3699 DATA 
3794 DATA 
3714 DATA 
3729 DATA 
3734 DATA 
3744 DATA 
3759 DATA 
3769 DATA 
3774 DATA 
3789 DATA 





0F,0F,0F,4F,0F,4F, 4, 4F,85,4F,9F,C5,8F.0F, 85, 59E 
8F,0F,85,0F,8F,C5, 8F,4F,C5,0F,8F,85,68,C9, 85, 6F9 
PF, aB,EB,C1,EB,0F,0F, 30, 8F, 2F, 2F,CF,#F, 2F,0F,505 
oF,6F,CF,0F,2F,0F,0F,2F,4F,CF, 2F,4F,0F,2F, 1F, D! 
BF, CF,CF,0F,0F, 44, 8F,C5, CF, 8F,85,9F,0F, 65, 4F, 63E 
CF,85,0F,0F,65,4F,CF,C5,0F, 0F,85,68, CD, 85, 8F, 689 
aB,ER,C,EB,VF,0F, 30, 3F,6F,2F,0F,0F, 2F,4F,F, 545 
6F,0F,0F,2F,4F,4F,6F,CF,8F,6F,CF,0F,6F,9F,CF, 651 
CF,0F,0F,6F, 44, 4F,C5,4F,8F,85,4F, 0F,85, CF, 8F,67E 
C5,4F,6F,CS,CF,CF,85,CF,6F,C5,66, C4, 85, UF, 4B, BBS 
EB,C1,EB,CF,CF, 3D, 9F,6F, 2F, BF, 4F, 6F,4F, 4F,6F, 74 
8F,4F,2F,0F,4F,6F,6F,CF, 2F,CF,4F,2F,9F,CF,4F,671 
8F,CF,8F,CA,4F,C5,CF,CF,85,4F,0F,85,8F, CF, 85, 8B4 
CF,uF,CS,0F,4F,85,4F,0F,C5,68,C0,85,0F, 4B, ER, 6DB 
C1,EB,0F, OF, 30, 3F, 2F, 2F, UF, CF, 2F, CF, 6F, 2F,8F,54D 
6F,2F,6F,6F,2F,4F,0F,6F,0F,4F,6F,1F,6F,8F,0F, 4F1 
8F,0F,CA,6F,685,8F,CF,65,CF, CF,C5,4F,2F, C5, 8F, 874 
4F,85,4F,0F,85,0F,8F,65,68,C9,85,0F, 4B, ER, C1, 68D 
EB, 0F,0F, 30, F, 2F, 2F,CF,4F, 2F,0F,6F, 2F,CF, CF, 508 
2F,4F,CF,6F,6F,0F,6F,8F,9F,6F,9F,CF,BF,CF, UF, GB! 
CF,CA,CF,C5,4F,6F,C5,4F,CF,CS,8F,0F,C5, BF, 9F, 684 
C5,8F,8F,85,0F,0F,85,68,C9,85,6F,4B,EB, C1,EB, 829 
CF, CF, 9F,0F,0F,2F,4F,4F,6F,4F,8F,2F,4F,4F,6F, 521 
0F,8F,2F,0F,0F,2F,CF,GF,6F,1F,8F,6F,8F,0F,4F,511 
CA,CF,85,4F,4F,C5,0F,CF,C5,0F,0F,CS,CF, CF, C5, BGA 
6F,8F,85,8F,0F,85,0F,0F, 8F,6F,4B,EB,C1,EB,0F,673 
OF, 0F,CF,aF,2F,0F,4F,6F,CF,aF,6F,0F,4F,2F,CF,521 
CF,6F,6F,8F, 2F,8F,aF,2F,0F, BF, aF,BF,aF, UF, CA, GCC 
6F,C5,0F,4F,85,CF,0F,85,8F,CF,85,8F,4F,CS,CF, 74F 
CF,85,0F,0F,65,6F,0F,0F,0F,4B,EB,CI,EB,CF,CF, 732 
CF,9F,0F,2F,CF,CF,6F,6F,4F,GF,CF,CF,6F,8F,F,6E1 
2F,4F,0F,6F, CF, 8F, 2F,1F,0F,6F,6F, 0F,BF, 44, OF, SUC 
85,CF,CF,C5,0F,0F,65,0F,4F,C5,CF,4F,85, UF, 2F, 66F 
C5,4F,6F,85,0F,0F,CF,CF,CB,EB,C1,EB,0F,0F,DF, 773 
4F,4F,2F,0F,0F,2F,CF,4F,2F,0F,0F,2F,4F,4F,6F, 3C1 
CF,0F,2F,0F, 0F,2F,0F,0F,9F,CF,CF, BF, 44, 4F, 85,562 
8F,0F,85,4F,0F,85,8F,9F,65,0F,8F,65,0F, CF, 85, 52F 
6F,0F,05,8F,CF,0F,0F,4B,EB,C1,EB,0F,0F, CF, 4F, 6BD 
8F,2F,CF,6F,6F,CF,6F,6F,CF,6F,6F,CF,8F,2F,8F,BC1 
CF,6F,4F,CF,2F,aF,01,05,0F,4F,6F,CS, CF, 8F,C5,685 
CF,9F,85,4F,CF,CS,4F,F,C5,9F,CF,CS, 4F, 8F, 85, 7EF 
4F,6F,6F,4F,CB,EB, C1,EB,0F,0F,4F,0F,4F, 2F,4F,627 
aF,6F,CF,4F,2F,4F,0F,6F,BF,4F,6F,8F,0F, 2F, 6F, 581 
8F,2F,9F,88,01,04,03,CF,0F,C5,4F,0F,C5,0F,9F, 4C4 
85, 6F,9F,C5,4F,4F,65,4F,4F,85,0F,6F,85, CF, 4F,66F 
8F,8F,4B,EB,C1,EB,01,95,0F, 2F,CF, 4F,2F,0F,0F,5AF 
6F,CF,0F,2F,0F,0F,2F,4F,CF, 2F,0F,0F,2F, 4F, BB, 43D 
91,84,03,CF,CF,CS,CF,8F,85,9F,CF,C5,CF, CF, C5, 854 
OF, CF,CS,CF,CF,95,0F,0F,85,6F,CF,DF,0F,4B,EB,71B 
C1,EB,0F,0F,6F,4F,4F,91,12,3F,2F,CF,4F,CF,0F, 574 
0F,6F,CF,4F,91,12,C8,85,CF,CF,0F, 0F, 4B, ER, C1, 6C7 
EB,4:,05,0F,01,12,5F,2F,0F,6F,0F,4F,6F, 4F,0F, 364 
6F,91,12,C0,0F,0F,4F,6F,6F, 4B,EB,C1,EB,CF,CF, 72D 
8F,CF,CF,01,15,0F,6F,4F,91,05,0F,6F,9F,8F,0F, 481 
aF,0F,8F,CF,8F,CF,4F,CF,CF, 4F,4F,CF,4F, BF,8F, 7AI 
4F,0F,0F,4B,EB,C1,EB,0F,0F,6F,4F,4F, CF, 0F,0F, 587 
8F,4F,4F,CF,0F,0F,GF,4F,4F,CF,CF,BF,4F,4F,CF, GEL 
8F,91,97,93,47,CF,0F,6F,6F,4F,0F,0F,CF,8F, CF, 577 
8F,CF,8F,CF,8F,CF, OF, 4F,CF, CF, CF, BF, 8F, 4B, ER, 939 





3799 DATA 
3840 DATA 
3619 DATA 
3829 DATA 
3639 DATA 
384$ DATA 
3859 DATA 
3869 DATA 
3679 DATA 
3889 DATA 
3899 DATA 
399€ DATA 
3918 DATA 
3924 DATA 
3939 DATA 
3949 DATA 
3959 DATA 
3964 DATA 
3979 DATA 
3989 DATA 
3998 DATA 
4899 DATA 
4919 DATA 
4924 DATA 
4939 DATA 
4949 DATA 
4ÿ59 DATA 
4969 DATA 
4979 DATA 
4969 DATA 
4999 DATA 
4199 DATA 
4119 DATA 
4129 DATA 
4139 DATA 
4144 DATA 
4159 DATA 
4169 DATA 
4173 DATA 
4169 DATA 
4199 DATA 
4290 DATA 
4218 DATA 
4229 DATA 
4239 DATA 
4249 DATA 
425 DATA 
426ÿ DATA 
4279 DATA 
4284 DATA 
4299 DATA 
4380 DATA 
4319 DATA 
4329 DATA 
4339 DATA 


C1,EB,91,9F,0F,6F,91,04,9F,CF,CF,CF,6F,91,97,572 
83,97,6F,CF,9F,9F,8F,CF,CF,9F,4F,CF,8F,CF,CF, 79D 
8F,CF,CF,0F,0F,9F,CF,CF,8F,9F,4B,EB,C1,EB,CF, 7C7 
CF,9F,CF,CF,4F,9F,4F,68F,CF,CF,4F,8F,68F,8F,9F, 761 
4F,CF,8F,CF,9F,0F,9F,4F,97,6F,4F,0F,CF,6F,0F,559 
97,0F,6F,0F,6F,0F,9F,0F,GF,CF,4F,CF,CF,4F,0F,519 
CF,4F,CF,0F,0F,4F,CF,0F,0F, 4B,EB,C1,EB,91,94,62E 
0F,6F,0F,0F,6F,0F,8F,8F,8F,0F,CF,6F,8F,6F,9F,5AI 
4F,91,04,0F,68F,47,4F,CF,CF,CF,0F,0F,07,CF,68F,578 
BF,9F,6F,CF,CF,4F,CF,6F,8F,4F,6F,CF,6F,4F,9F, 7A1 
4F,8F,CC,CC,CC,8F,4B,EB,C1,EB,0F,0F, 3C, 3C, 2D, 776 
3C,3C, 2D, 30, 3C, 2D, 3C, 3C, 2D, 3C, 8C, 2D, 3C, 3C, 2D, 339 
3C,3C,2D,6F,47,4F,6F,4F,4F,9F,9F,47,0F, 3C, 3C,3E3 
2D, 3C, 3C,6D, 3C, 3C, 2D, 30, 3C, 2D, 3C, 3€, 2D, 3C, 3, 379 
2D,CC,C4,C4,8F,4B,EB,Ct,EB,8F,9F,29,93,97,29,66C 
93,07,29,93,97,29,93,87,29,93,07,29,93,87,29,0FF 
93,07,4F,97,8F,9F,4F,4F,CF,9F,07,9F,68,C8,85, 43D 
68,C4,C5,68,C9,C5,68,C8,C5,68,C9,85,68,CY,C5, 961 
C8,C8,CC,8F,4B,EB,C1,EB,9F,0F,29,93,97,29,93,64A 
97,29,93,07,29,93,97,29,03,07,29,03,07,29,93,0FF 
47,CF,07,CF,9F,0F,9F,4F,CF,47,9F,68,CÛ0,85,68, 5A2 
C9,85,68,C9,C5,68,C9,C5,68,C8,85,68,C9,85,CC, 945 
C4,C4,9F,4B,EB,C1,EB,0F,9F,29,93,97, 29,ÿ3,97, 4FD 
29,83,47,29,93,97,29,03,07,29,93,07,29,03,07,0FF 
9F,07,0F,0F,CF,CF,CF,UF,07,0F,68,C9,C5,68, C8, SDB 
5,68,C9,85,68,C4,C5,68,C9,85,68,C9,85,CB,CB, 949 
CC,CF,CB,EB,CI,EB,8F, UF, 29,93, 97,29,93,97,29,5AA 
43,97,29,93,07,29,93,97,29,93,07,29,03,97,8F,165 
97,4F,0F,0F,0F,0F,4F,47,0F,68,CD,85,68,C9,C5,551 
66,C4,C5,68,C4,C5,68,C4,C5,68,CH,C5,CC, C4, C4, AÿB 
8F,4B,EB,C1,EB,9F, 9F,29,93,97,29,93,07, 29,93, 421 
97,29,93,97,29,93,97,29,93,97,29,43,87,8F,07,169 
QF,4F,CF,6F,CF,CF,07,4F,66,C9,C5,68,Cÿ,C5,68,7F2 
CD,85,68,C0,C5,68,C4,C5,68,C4,C5,C8,CB,CC, 4F,9B7 
CB,EB,C1,EB,0F,0F,29,03,97,29,93,97,29,93,07,419 
29,43,67,29,93,97,29,03,97,29,93,07,0F,01,97,8E3 
53,47,9F,66,C0,C5,68,C0,C5,68,Cÿ,85,68,C8,85, 78D 
68,C2,C5,68,C4,85,CC,C4,C4,8F,4B,EB,C1,EB, F,96E 
9F,29,03,07,29,93,97,29,93,07,29,03,97,29,93, 107 
87,29,45,97,29,93,07,9F,01,97,03,47,CF,68,C9,285 
85,66,C9,85,66,C9,85,68,C4,85,66,C9,85,68, C0, 861 
85,C8,C8,CC,6F,4B,EB,C1,EB,91,05,0F,CF, 81,98, 73F 
9F,6F,9F,4F,CF,CF,9F,8F,4F,9F,GF,47,4F,CF,0F, 599 
9F,6F,4F,47,CF,9F,9F,8F,CF,9F,QF,CF,8F,0F,6F,590 
SF,6F,CF,8F,4F,8F,9F,8F,CC,CC,CC,9F,4B,EB,C1, 7E2 
EB,91,16,9F,4F,9F,97,01,66,0F,07,0F,0F,68F,4F,28F 
91,15,6F,4B,EB,C1,EB,91,13,C3,8F, 3C, 3C, 2D,9F,51F 
97,0F,4F,6F,9F,6F,9F,47,4F,3C,3C,20,4B,01,13,37B 
C3,EB,C1,EB,01,13,C3,9F,29,93,97,4F,47,9F,8F,5A7 
8F,6F,9F,6F,97,8F,68,C8,85,CB,91,13,C3,EB,C1,6CD 
EB,91,12,03,43,0F,20,93,97,CF,97,BF,0F,4F,0F, 356 
0F,4F,47,9F,66,C8,C5,4B,91,12,C9,C1,EB,C1,EB,717 
91,12,93,43,9F,29,95,97,9F,97,0F,0F,4F,4F,4F, {BC 
8F,07,9F,68,C9,C5,4B,#1,12,C8,C1,EB,C1,EB, 91,689 
98,03,C3,C3,83,91,97,03,43,BF,29,93,47,8F,97,3FA 


434$ DATA 4F,9F,0F,4F,CF,CF,47,4F,68,C8,C5,CB,91,98,C9,671 


4359 DATA 
4360 DATA 
4379 DATA 


C3,C3,C2,91,87,C9,C1,EB,C1,EB,91,97,93,C3,0F, 745 
CF, 4B,65,91,96,93,43,4F,29,93,07,0F,07,0F,9F, 2A9 
CF,CF,CF,8F,97,CF,68,C9,C5,4B,91,97,C9,C3,0F, 744 


4389 DATA 
439g DATA 
4499 DATA 
441g DATA 
4429 DATA 
443ÿ DATA 
444g DATA 
445g DATA 
4469 DATA 
à47ÿ DATA 
448ÿ DATA 
449g DATA 
4599 DATA 
4514 DATA 
4524 DATA 
453% DATA 
4544 DATA 
4558 DATA 
4568 DATA 
4574 DATA 
4584 DATA 
459$ DATA 
4699 DATA 
4614 DATA 
4629 DATA 
4634 DATA 
4644 DATA 
4658 DATA 
4669 DATA 
4674 DATA 
4689 DATA 
469$ DATA 
4794 DATA 
4718 DATA 
4724 DATA 
a738 DATA 





CF,48,C2,91,96,C9,C1,EB,C1,EB,91,96,93,43, 87, 6CF 
CF,CF,8F,C3,91,96,03,43,9F,29,03,07,6F,91,97,416 
83,47,9F,68,C9,C5,4B,91,96,C8,C1,87,CF,CF,8F,6CD 
C3,81,86,C9,C1,EB,C1,EB,91,96,93,C7,4F,4F,6F,6EÛ 
8F,9F,683,91,85,93,43,CF,29,93,97,8F,01,07,93,289 
97,CF,68,C9,C5,CB,91,96,C9,87,9F,9F,6F,QF,QF, SAT 
C3,91,95,C4,C1,EB,C1,EB,91,05,03,43,CF, 4A, 4F, 695 
9F,4F,0F,CB,91,95,93,43,9F,6F,9F,8F,9F,97,4F, 325 
9F,91,94,4F,97,4F,4F,4F,CF,4B,91,95,C9,C1,4F, 497 
CF,UF,FF,85,9F,4B,C2,91,94,C8,C1,EB,C1,EB, 91, 79C 
95,93,C3,9F,C0,4F, 4A,4F,CF,4B,83,91,94, 93,43, 46 
CF,6F,9F,9F,0F,47,9F,CF,CF,4F,4F,4F,47,CF,CF,651 
9F,9F,CB,91,95,C0,C3,8F,CF,8F,FF,EA,9F,6F,C2, 728 
g1,94,C9,C1,EB,C1,ER,91,05,099,87,9F,C9,9F,C8,64B 
9F,4F,CF,63,91,94,93,43,8F,3C, 3C,2D,6F,47,4F, 454 
CF,4F,8F,6F,4F,47,CF,93C,3C,2D,4B,91,95,C4,87,59E 
QF,9F,4A,FF,FF,4F,9F,CR,91,94,Cÿ,C1,EB,C1,EB, 7AC 
91,94,93,43,4F,8F,C9,9F,C9,4F,4F,6F,CB,91,94, 4B5 
03,43,09F,29,93,97,0F,07,0F,0F,4F,4F,0F,0F,07,17F 
9F,68,C9,85,4B,91,94,C9,C1,9F,9F,6F,4A,FF,EA, 66D 
85,9F,CB,91,94,C9,C1,EB,C1,EB,91,94,93, 43,8F, 656 
4A,EA,4A,EA,8F,6F,9F,CB,91,94,93,43,CF,29,93,526 
47,4F,47,CF,CF,CF,4F,8F,CF,47,4F,66,C9,85,CB, 895 
91,94,C9,C1,CF,9F,9F,DD,EA,E9, AF,QF,CF,C2,CD, 829 
C9, C4, CI,ER,C1,EB,91,94,93,C7,9F,4A,EA, 4A,EA,BÎE 
8F,0F,4F,4F,83,93, 93,93, 43,4F,29,93,97,4F,47, 243 
8F,6F,4F,4F,9F,CF,97,6F,68,C0,85,CB,91,84,Cÿ, 5ED 
87,0F,9F,0F,CB,EA,EA,EF,6F,4F,C2,C9,Cÿ,Cÿ,C1,969 
EB,C1,EB,91,94,93,87,0F,4A,EA, 4A,EA, OF, 8F,4F, G6QA 
CF,83,93,83,93,43,4F,29,93,97,CF,97,CF,4F,6F, 4A3 
4F,8F,4F,47,6F,68,C0,85,4B,91,894,C0,87,9F,8F,5E5 
ÿF,C4,FF,EA,AF,9F,4F,CB,C9,C9,C9,C1,EB,C1,EB, A2C 
93,93,93,43,CF,0F,DS,EA, 4A,EA,01,04,0F,4B,93,47F 
93,43,43,6F,29,93,97,4F,97,CF,9F,0F,4F,CF, OF, 37B 
97,0F,66,C8,C5,48,C9,C8,C9,C1,68F,8F,CF,6F,EE, 8B9 
FF,C4,85,4F,9F,CB,C9,C9,C9,C1,EB,C1,EB,993, 99, 99F 





t 





474ÿ DATA 
4758 DATA 
4760 
4770 
4789 
1704 
4690 
4819 
482$ 
4839 
4849 
485ÿ 
4869 
4879 
4889 
4899 
4999 
4919 
8928 
493 
494$ 
4959 
1969 
1979 
4984 
4999 
5099 
5ÿ19 
5929 
5439 
5g4ÿ DATA 
5g5g DATA 
5964 DATA 
5978 DATA 
5g84 DATA 
5gQy DATA 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 





93,43,9F,9F,DS,EA,DS,EA, 85,4F,CF,CF,CB,93,93,6ES 
93,43,68F,29,03,07,8F,01,47,93,47,4F,68,C8,85, SES 
CB,C9,C9,C8,C1,UF,8F,9F,4A,EE,FF,C4,85,4F,9F,B57 
CB,CA,C9,C9,C1,EB,C1,EB,03,03,93,43,4F,9F,DS, 7E2 


| sl FF,FF,EA,9F,0F, OF, 4B,43,43,03,43,4F, 429, 93,51! 


7,8F,81,07,03,07,0F,66,C8, C5, 4B, C0, CU, CS, 
BF, GF,SF,EE,FF,FF,CD,9F,4F,@F,C2,C0,C8, on 
EB,C1,EB,03,93,03,C7,9F,0F,D5,FF,FF,FF,EA, 65, 8C6 
4F,68F,CF,83,93,93,45,4F,0F,8F,4F,0F,07,4F,4F, 469 
6F,6F,4F,CF,47,0F,4F,0F,UF,4B,C9,C9,CD,67,9F,5Aÿ 
0F,0F,SF,FF,D5,FF,CD,DF,9F,0F,C2,C8,C9,C1,EB, 838 
C1,EB,93,93,93,687,4F,C9,05,91,94,FF,EA,0F,@F,62C 
4F,63,93,93, 43,6F,0F,9F,9F,6F,47,4F,CF,4F,CF, 4E9 
CF,CF,97,CF,CF,8F,CF,CB,C9,C9,C9,87,CF,4F,9F, 969 
D5,FA,C8,EA, 4A,DF,CF,CF,C2,C9,C8,C1,EB,C1,EB, B2 
93,03,03,87,0F,C9,D5,91,84,FF,EA, 8F,9F,9F, 893,552 
93,93,43,0F,3C,3C, 2D,8F,47,4F,8F,0F,4F,4F,9F, 36D 
47,0F,3C,3C,6D,CB,C6,C9,C9,87,CF,0F,0F,FF,FF, 7BB 
C4,EA,CE, 9F,6F,4F,4R,Cÿ,C8,C1,EB,C1,EB, 93, 93, 892 
43,4F,C0,C9,01,96,FF,85,9F,6F,4B,93,93, 43,CF,59E 
29,03,97,9F,47,0F,6F,0F,CF,9F,9F,97,CF,68,C9, 421 
85,4B,C8,C9,C1,9F,8F,4F,9F,D5,FF, DD, DD, CE, 9F, 878 
8F,9F,CB,C9,C9,C1,EB,C1,EB, 93,93, 43,0F, AA, DS, 738 
FF,FF,C9,D5,FF,FF,EA, 9F,9F,4B,93,93,43,6F,29,7E5 
93,97,CF,47,CF,CF,4F,4F,8F,CF,47,CF,68,C9,C5, 7BD 
CB,C9,C9,C1,9F,6F,4F,4A,FF,FF,DD,C8,4E, F,F, 852 
gF,CB,C4,C9,C1,EB,C1,ER,93,93,43,CF,C9,D5,FF,95E 
FF,EA,E0,FF,FF,FF,85,6F,4B,93,93, 43, 4F,29,93, 7E9 
97,6F,47,0F,8F,4F,4F,0F,9F,97,9F,68,C9,C5,CE, 585 
CA,C8,C1,8F,CF,4F,4A,FF,FF,DD,C4,4E,C5,CF, 4F, ADB 
CB,C9,C9,C1,EB,C1,EB,03,93,43,8F,C9,C8,FF,FF, 9F9 
EA,CG,FF,FF,FF,EA,0F,CB,93,93,43,CF,29,93,97, 7E6 
8F,07,0F,4F,8F,4F,CF,9F,47,CF,68,C9,85,4B,C9,5FE 
CA,C1,8F,CF,9F,4A,FF,FF, DD, EA, 8D, CD, 4F,4F,CB, C9 
C9,C9,C1,EB,C1,EB,93,093,43,C9,C8,93,D5,FF,FF,977 
CO,FF,FF,FF,81,9F,4B,93,93,43,4F,29,93,47,9F,5B2 





allo 


(CIXORTITOS 


Attention, notez bien ce qui suit : 
Dès le mois de septembre, tous les mercredis 


de 14 h à 17 h, la rédaction se tiendra à votre 
disposition au 99 52 98 11 pour tous renseigne- 
ments techniques. En dehors de ce créneau les 
réponses techniques se feront par courrier (n’ou- 
bliez pas de menticnner votre adresse et joignez 
un timbre pour la réponse) ou bien par Minitel 
sur le 3615 code : MHZ. 





5199 DATA 47,4F,8F,9F,8F,9F,8F,97,6F,66,C9,85,CB,C9,C9,G6EF 
5119 DATA C1,9F,0F,8F,DF,FF,FF,DD,FF,8D, 8D,9F,8F,4B,C9, 86A 
5129 DATA C6,C1,EB,C1,EB,993,93,43,4A,C8,81,42,D5,D5,FF, 8D7 
5139 DATA FF,FF,EA,42,85,4B, 93,93, 43,0F,29,93,97,0F,91, 495 
5149 DATA 97,93,97,9F,68,C4,C5,4B,C8,C8,C1,8F,9F, F,D5, 59B 
5159 DATA FF,FF,DD,FF,CD, 8D,9F,8F,9F,C2,C9,C1,EB,C1,EB, ABB 
5169 DATA 93,93,C2,C9,D5,EA,93,42,42,FF,FF,FF,81,D5,C9, BEL 
5179 DATA CF,83,93,43,9F,29,93,47,4F,01,07,03,07,9F,69,2F2 
5189 DATA C9,C5,4B,C9,C9,87,CF,4F,8F,D5,FF,D5,DD,FF,CE, AD7 
5198 DATA 4A,8F,CF,8F,C2,C9,C1,EB,C1,EB,93,93,C2,Cÿ,D5,96E 
5299 DATA FF,C9,42,42,C9,CD,EA, 42,FF,EA, 85, 83,83, 43,8F, 8B5 
5219 DATA @F,4F,8F,4F,97,CF,4F,9F,0F,8F,CF,47,9F,9F,6F,451 
5224 DATA CF,CB,C9,C9,C7,89F,4F,0F,D5,EA,D5,DD,FF,4E,4E, 95A 
5239 DATA 8F,CF,8F,C2,C9,C1,EB,C1,EB,093,993,C2,C0,FF,FF, A6D 
5249 DATA FF,C0,C4,03,93,C8,D5,FF,FF,C5,63,45,43,4F,6F, 884 
525ÿ DATA 9F,9F,9F,07,4F,8F,CF,CF,CF,0F,97,9F,CF,CF,CF,591 
5269 DATA 4B,C4,C9,87,aF,ÿF,@F,DS,EA,DS,DD,EA,CC,4E,9F, 843 
5279 DATA 4F,9F,C2,C9,C1,EB,C1,EB,03,993,C2,D5,FF,FF,D5, 9AB 
5284 DATA EA,42,09,81,93,FF,EA,F5,C5, 89,93, 43,8F, 3C, 3C, 763 
5298 DATA 2D,8F,97,4F,891,04,0F,4F,47,9F, 3C, 3C, 2D,4B,C9,37B 
5394 DATA C9,C7,CF,CA,CO,FF,D9,D5,C8,EA,CD,4E,F,4F,8F,9BE 
5314 DATA C2,C9,C1,EB,C1,ER,03,93,C2,D5,FF,FF,DS,EA, 42, A76 
5329 DATA FF,EA,81,FF,EA,D5, 85,83, 93,43, 6F,29,93,97,6F, ?C7 
5339 DATA 97,9F,4F,CF,8F,CF,CF,07,4F,68,C8,C5,CB,C8, C8, 7EF 
5349 DATA C7,4F,D5,FF,FF,CG,FF,C8,EE,65,4E, DF,0F,4F,C2,06ÿ 
5359 DATA CA,C1,EB,C1,EB,93,03,C2,FF,FF,FF,DS,FF,42,FF, AF2 
5369 DATA FF,C,FF,D5,FF,85,63,993,43,0F,29,43,87,4F,97,678 
5379 DATA CF,9F,4F,0F,4F,0F,47,0F,668,C9,C5,4B,Cÿ,C9,87,62F 
5389 DATA 4F,5F,FF,FF,CO,FF,CB,EE,85,CE,6F,6F,4F,C2,C5, A63 
5399 DATA C{,EB,C1,EB,93,93,D7,FF,FF,FF,EA,FF,61,FF,EA,B85 
5499 DATA 57,EA, 42,C9,4F, 83,93, 43,6F,29,93,97,8F,47,0F, 487 
5419 DATA CF,CF,4F,0F,9F,07,CF,68,C9,85,4B,C9,C9,67,4F, ?2F 
5429 DATA 8F,D5,FF,D5,FF,C8,C8,85,4E,8F,9F,4F,C2,C8,C1,9CA 
5439 DATA EB,C1,EB,93,93,D7,FF,FF,FF,EA,FF,81,D5,EA, 42, ADC 
5449 DATA C9,57,EA,0F,83,93,43,CF,29,93,97,8F,47,4F,CF,5CF 
5459 DATA 0F,4F,8F,4F,47,CF,66,C9,65,4B,C9,C9,67,0F,9F,66F 
5469 DATA CO,FF,FF,FF,C4,D5,C9,4E,4F,4F,9F,C2,C9,C1,EB, A3F 
5479 DATA C1,EB,43,03,D7,91,84,FF,D5,81,C9,C9,C9,9B,C8, EE 
5489 DATA 85,9F,83,93,43,9F,29,93,97,9F,07,4F,4F,01,84,258 
5499 DATA 9F,97,0F,68,C9,85,4B,C9,C9,87,8F,4F,4A,FF,FF,74A 
5599 DATA FF,C4,FF,CS,4E, 4F,4F,9F,C2,C9,C1,EB,C1,EB,93,95A 
5519 DATA 93,D7,91,94,FF,C9,C9,07,4A,97,81,65,9F,6F, 63, SDD 
5529 DATA 93,43,CF,29,93,87,6F,81,97,93,47,4F,68,C9,85,425 
5539 DATA 4B,C9,C8,87,CA,C9,C9,FF,FF,FF,C8,FF,DS,C4,9F, BD 
5549 DATA 4F,8F,C2,C9,C1,EB,C1,EB,93,93,D7,91,45,FF, C9, 85A 
5559 DATA 93,93,4A,42,9F,0F,4F,83,03,43,CF,29,93,97,4F,319 
5569 DATA 91,97,93,07,8F,68,C0,C5,CB,C9,C9,87,CA,FF,EA, 813 
5574 DATA FF,FF,FF,DD,FF,D5,C4,9F,9F,4B,C9,C8,C1,EB,C1, AC& 
558$ DATA EB,93,93,43,91,95,FF,EA,81,85,81,C5,4F,DF,4B,616 
5599 DATA 93,93,43,4F,8F,0F,9F,0F,47,4F,6F,4F,0F,9F,4F, 335 
5690 DATA 97,9F,CF,9F,8F,4B,C9,C8,C1,8F,91,05,FF,DD,FF,77F 
5619 DATA DS,EE,85,9F,CB,C9,C9,C1,EB,C1,EB,93,93,43,91,844 
5628 DATA 85,FF,85,8F, 4A, 42,8F,0F,0F,CB, 03,93, 43, 8F,8F,583 
5638 DATA 9F,0F,4F,97,CF,0F,4F,4F,0F,0F,07,4F,4F,6F,CF,411 
5649 DATA 4B,C9,C8,C1,8F,D5,FF,FF,FF,EA, DD,FF,D5, EA, 8D,BFF 
5659 DATA ÿF,4B,C9,C9,C1,EB,C1,EB,93,93,43,91,95,FF,C5, 745 
5669 DATA 44,81,C5,CF,CF,CF, 4B,93, 93, 43,8F,3C,3C,2D,CF,694 
5679 DATA 97,CF,91,94,9F,CF,47,4F,3C,3C,6D,CB,CB,CD,C1,649 
568$ DATA CF, 4A,D5,FF,FF,EE,FF,EA,FF,EA, 6D, 8F, 4B,C9, CD, B93 





5699 DATA 
5794 DATA 
5719 DATA 
5729 DATA 
5738 DATA 
574$ DATA 
575 DATA 
5764 DATA 
5778 DATA 
5784 DATA 
5799 DATA 
5699 DATA 
5814 DATA 
5829 DATA 
5834 DATA 
5849 DATA 
5854 DATA 
5869 DATA 
5879 DATA 
5889 DATA 
5699 DATA 
5999 DATA 
5919 DATA 
592$ DATA 
5934 DATA 
5944 DATA 
5954 DATA 
596€ DATA 
5979 DATA 
598% DATA 
599g DATA 
6y94 DATA 
6919 DATA 
6#2ÿ DATA 
6938 DATA 
694g DATA 
6959 DATA 
6264 DATA 
6979 DATA 
6989 DATA 
6999 DATA 
6199 DATA 


c1,EB,C1,EB, 03,93, 43,41, 04,FF,EA, 4A, 81, 42,81, 69D 
d4,0F,48,93,03,43,CF,29,93,07,2F,07,0F,4F,CF, 2AC 
CF,CF,8F,07,CF,68,C0,C5,CB,C9, CP, C1,0F,0F, CA, 854 
FF,FF,EE,FF,CP,FF,EA, 8D,8F, 4B,C,CB,C1,EB, C1, RER 
EB,03,93,43,FF,FF,FF,EA,EA, Bt, 42,C5,4F,CF,8F, 934 
CF, CB, 03,93, 43,0F, 29,43, 07,8F,07.uF,01,04,9F,31E 
4F,47,8F,66,C4,85,CB,C9,CO,C1,9F,4F,4F,CO,FF, 844 
EE,EA,FF,FF,FF,8D,0F,4B,C0,CH,C1,EB,C1,E8,43, 407 
03,43,FF,FF,FF,EA, CO, 42,85,0F,0F,4F,0F,4F,4B, 704 
23,03,43,CF, 29,03, 07,0F,07,0F,4F,CF,BF,CF, CF, 4BB 
87,CF,66,C9,C5,CB, C9, C9, C1,6F,4F,0F,C@,FF,EE, 969 
EA, FF,FF,FF,C8,0F,CB,CB, CP, C1,EB,C1,EB, 93, 83, A67 
03,07,FF,FF,EA,03,C5,4F,0F,CF,CF, 0F,0F, 33,03, 724 
83,03,0F, 29, 03,47,9F,07,4F,0F,4F,0F,4F,0F, 07, 1FF 
6F,68,C0,C5,CB, CO, CO, C9, 87, CF,0F, C9, D5, EA, 91, 8EC 
g4,FF,DD,85,C2, CO, CB,C1,EB,C1,EB, 93,03, 43,07, 8DF 
FF,EA,81,C0,0F,4F,0F,CF,0F,4F,6F,83,93,93,43,65F 
CF, 29,03,07,0F,47,0F,CF, CF, 0F,0F,0F,07,CF,68, 470 
Ca,85,4B, CO, C9, C0, 67,4F,0F,C0,D5, DD, #1, 04,FF, 82B 
Ca, EA,C2,CD,C9,C1,EB,C1,EB,93,93,03,D7,FF, 81,948 
42,01,06,0F, 83,83, 03, 43, 6F,29,03,07,6F,01,07,27F 
83,47,CF,68,C0,85,4B,CD, CB,CB, 87, 0F,6F, 4A, CB, 788 
DD,91,04,FF,EE,FF, C2, C9, CO, C1, EB,C:,EB,93,93,96E 
83,43,C0,42,85,0F,8F,0F,4F,4F,BF,CF,CB, 43, 03,547 
83,43,0F,29,03,07,0F,01,97,03,07,0F,68,C0,85, 265 
4B,CO,CO,CB,C1,8F,0F, 4A,CB,DD,91,94,FF,EE, ER, GAE 
Ca, CU, C8, C1,EB,C1,EB,03,93,03,43,03,D5,85,6F, 7D9 
0F,01,05,8F,CB,93,03,03,43,8F,0F,0F, OF, 4F,0F, 2D5 
CF,0F,0F,4F,BF,CF,CF,4F,8F,CF,6F, CB, C, CO, CH, 8B9 
C1,0F,CF,44,C2,D5,01,04,FF,EE,C1, CA, CB, CH, C1, 932 
EB,C1,EB,03,03,03,43,C9,EA,4F,0F,0F,4F,8F,4F,627 
CF, CF, 4B,03,23,03,43,01,05,0F,4F, BF, 01, Hd, PF, 33C 
8F,8F,8F,0F,0F,0F,CB, CO, CO, C9, C1, UF, 4F, CA, CA, 798 
D5,01,94,FF,EE,C1,CB,C, CP,C1,EB, C1, ER, 91, fa, 95 
93,07,EA,4F,4F,01,04,0F,aF,4F,83,03, 03,03, 43,3E3 
4F,03,03,03,CF,0F,CF,1E, 2, 3C,0F,CF,CF, #F, 3C, 403 
3C, 2D, CB, #1,94,C9,87,0F,4A, 44, CD, 01, 04,FF,EE, 5DS 
C2, CP, C8, CH, C1,EB,C1,EB,81,04,93,07,85,4F,8F, 7DC 
6F,CF,4F,4F,0F,0F,83,03,93,03,43,4F,03,83,83, 491 
8F,0F,8F,1E,03,03,4F,8F,6F,0F,68,C0,C5,CE, 01,506 
da,C0,87,4F,8F, 44, C9,01,04,FF, EE, C2, CO, CH, CD, 827 
C1,EB,CI,EB,91,04,03,43,65,CF,CF,CF, 0F,0F,CF, 782 
6119 DATA CF,CB,01,04,03,43,8F,43,43,03,0F,8F,CF, LE, 03, 488 
6129 DATA 03,0F,CF,CF,4F,58,C8,C5,CB,01,94,C0,C1,8F,0F, 71B 
6139 DATA CA,C,D5,FF,FF,FF,EB,91,04,C9,C1,EB,C1,EB,01,A65 
6149 DATA 0a,03,43,85,0F,0F,0F,4F,aF,8F,0F,4B,01, 4,03, 28B 











6159 DATA 43,6F,93,83,83,0F,4F,9F, 1E,93,93, 4F,6F,9F,CF, 428 
6169 DATA 66,C9,C5,CB,91,94,C9,C1,8F,9F,CA,CB,D5,FF,FF,939 
6179 DATA FF,EB,41,94,09,C1,EB,C1,EB,91,95,93,C7,CF,8F,835 
6189 DATA CF,CF,9F,CF,CF,83,91,94,93,43,9F, 43, 43,93, 6F,54ÿ 
6199 DATA CF,4F,1E,83,93,9F,CF,4F,8F,68,C9,85,CB,91,95,57C 
6299 DATA C9,87,9F,CA,CA,DS,FF,FF,FF,C2,91,84,C9,C1,EB, SEF 
6219 DATA C1,EB,91,95,93,C3,4F,9F,4F,0F,4F,9F,CB,83,91,4E1 
6229 DATA 64,93, 43,CF,93, 83, 83,8F, 4F,9F, LE, 93,93,4F,CF,3D1 
6239 DATA 9F,CF,68,C9,C5,CB,91,95,C9,C3,6F,4A,4A,C9,FF,881 
6249 DATA FF,EB,C2,91,94,C9,C1,EB,C1,EB,91,95,93,43,CF,7E4 
6259 DATA 91,84,9F,CF,CB,91,95,93,43,9F, 43, 43,93, 4F,8F, 37 
6269 DATA 4F,1E,93,95,4F, 6F, 4F,9F,68,C9,C5,CB,91,85,C9, 52D 
6279 DATA C1,8F,9F,CA,C9,FF,FF,EB,91,95,C9,C1,EB,C1,EB,9F9 
6289 DATA 91,96,93,87,9F,6F,4F,4F,CF,83,91,95,93,43,CF, 43A 
6299 DATA 93,63,83,8F,4F,9F,1E,93,93,0F,0F,0F,CF,68,C9,3BE 
6390 DATA B5,4B,91,96,C9,87,9F,4A,C8,FF,FF,C2,91,85,C9, 6BD 
6319 DATA C1,EB,C1,EB,91,96,93,43,87,9F,9F,9F,C3,91,96,523 
6329 DATA 93,43,CF,93,93,93,9F,CF,4F,6F,9F,0F,6F,4F,4F, 425 
6339 DATA CF,9F,9F,8F,4B,81,96,C9,C1,87,4A,C9,D5,C3,91,679 
6349 DATA 96,C9,C1,EB,C1,EB,91,97,93,C3,8F,CF,CB, 83,91, 799 
6358 DATA 96,03,43,91,11,9F,4B,91,97,C9,C3,9F,C9,C1,C2, 495 
6369 DATA 91,96,C9,C1,EB,C1,EB,91,98,93,C3,C3,83, 81, 97,630 
6379 DATA 93,43,8F,9F,6F,9F,8F,6F,CF,4F,9F,9F,8F,CF,CF, 649 
6389 DATA 4F,6F,CF,8F,CB,91,98,C8,C3,C3,02,91,87,C9,C1,7A1 
6398 DATA EB,C1,EB,91,12,93,43,91,66,9F,6F,6F,9F,8F,0F, 4D1 
6490 DATA BF,8F,6F,0F,8F,9F,CB,#1,12,C9,C1,FB,C1,EB, 91,751 
6419 DATA 12,93,43,4F,CF,6F,4F,6F,8F,CF,9F,CF,CF,9F,CF,6CC 
6429 DATA CF,8F,CF,CF,8F,CB,91,12,C9,C1,EB,C1,EB, 81, 36, 7BA 
6438 DATA C3,EB,C1,91,39,FF,EB,C1,91,39,FF,EB,C1,91, 39,873 
6449 DATA C3,C3,99,00, 00, 00,05,00, 00, 09,09,00,09, 69, 09, 186 
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19 ’ Createur de P5S.BIN 
28 ‘ 

38 MODE 2:AD=8C299 :NL=189 
48 FOR A=1 TO 377:B=ÿ:FOR C=1 TO 15:READ A$ 

58 POKE AD, VAL("&"+A$) :B=B+PEEK(AD) : AD=AD+1 

69 NEXT:READ E$:1F VAL("&"+E$) CB THEN 89 

79 NL=NL+IB:NEXT:SAVE"PS. BIN",B, &CH99, &169B:CLS : END 

88 CLS:PRINT'LIGNE"NL;" INCORRECTE": END 

99 

199 DATA 67,31,C9,D9, 92,97, B8, 99, 33,CA,C9,C,C9,98,48,678 
119 DATA 92,04,C0, 80,00,09,92,04,C9,99,89, 09,49, 92,92,258 
129 DATA C8,88,92,84,99, 02,92, C0,09,08,C9, 99,98, 4ÿ,C8, 3CA 
138 DATA 69,99,C9,08,90,49,91,92,95,99,11,89,22,92,94,251 
149 DATA 99,22,88,11,99,99,09,11,09,89, 09, 22,90,98,22, 188 
159 DATA 99,89,99,11,90,11,90,99,89,09,99, 22,22, 09,02, 168 
169 DATA 91,C9,89, 02,95, 99,02,601,C9,89, 09,48, 11,C4,98,39C 
178 DATA 99,60,09,49,91,C9,09,09,88,49,00,91,89,C9,89, 422 
189 DATA 89,49,89,11,99,C9,09,C9, 99,88, 11,99,08,92,92,366 
198 DATA C4,69,99,11,99,00,92,91,C9,89,89,99,11,99,90,325 
289 DATA 98,C0,89,09,11,C9,09,49,C9,98,99,11,C9,98,49,3A2 
219 DATA C9, 88,99, 11,98, 99,92,03,C9,09,11,90,49,92,93,26C 
228 DATA C8,89,22,22, 92,85, C9,09,49,92,39,C8,C8, 98,98, 446 
238 DATA 99,99,98,67,31,C9,D9,92,47,B2,89,3D,CA,C8,C9,57C 
249 DATA 88, 99,92,95,C9, 90,09, 49,C9,C9,C9,88,06,00,98,447 
259 DATA C8,C8,C9,92,04,00,49,C8,88,49,89,09,C9, 99, C9, 696 
269 DATA 88, 49,88, 99,C9, 99, C9, 22, 02,05,09,62,11,92,94,362 
278 DATA 99,11,49, 09, 22, 99,99,09,22,49,89,11,99,99,11,177 
288 DATA 99,49,C9, 99, 22, 09,22, 49,C9,49,09,11,11,99,48,2E6 
299 DATA C9, 09,49,00,98, 49,86, 49,98, 49,89, 22,49, 89,49, 3E2 
389 DATA 98,00,89,62,89, 09, 49, 09, 09,09,62,89,96,4ÿ,969,2C4 
319 DATA 99,08,22,00,49,C9,80,00,99,22,09,49,C9,C9, 90,384 
329 DATA 80,22,49, 89,49, 49, 49,09, 22,49,89,48,89,49,80,4ÿ4 
334 DATA 62, 89,99,C0,89, 00,89,62,89,09,C9,C0,99,09, 22,526 
349 DATA 99,49,C9,C0,89,09,22,09,C9,C9,C9,C8,11,11,49,5C4 
359 DATA C9, C6, C9, CO,89, 00,92, 3A,C9,C9,00,00,00,29,09,53C 
369 DATA 67,31,C9, D9,92,97,B2,899,B3,FC,C8,C9,C9,99,49,724 
378 DATA 92,04,C0,60,99,00,02,04,C9,09,06,96,49,92,92,258 
389 DATA C9,89,92, 84,90, 02,92,C9,49,86,C9,49,89,49,CD,54A 
398 DATA 49,89,C8,49,89,49,91,92,95,68,11,89,22,92,84,3D1 
489 DATA 98,22,88,11,09,99,09,11,99,69,99,22,98,98,22, 188 
418 DATA 99,69,96,11,990,11,90,09,89, 09,09, 22,22,49,89,226 
429 DATA 89,92,94, 09,49, 60, 69,00,00,11,00,09,95,88,48,297 
439 DATA 99,11,90,90,09,89,49,69,11,99,09,99,89,99, 89,262 
449 DATA 11,90,90, 90,80, 89,09,11,90,09,00,60,09,98, 11,133 
458 DATA 99,09,90,80,99,600,11,49,80,89,C9,09,00,11, 49,262 
469 DATA 69,49,C09,90,00,11,99,09,49,C9,89,690,11,98,98, 322 
479 DATA 92,93,C8,90,11,09,49,82,93,C9,69,22,22,92,85, 2A6 
489 DATA C8,99,49, 92, 39,C9,C9,09,99,08,99,98,67,31,C9,41C 
499 DATA D9,92,97,B2,99,BD,FC,C8,C9,89,90,02,85,C9,90,614 
599 DATA C9,48,C9,C9,C9, 89,09,C9, 99,C8,C8,C9, 92,04, 98,6C6 
519 DATA 49,C9,80,C0,90,00,49,80,C0,89,C9,00,09,49,89,5C$ 
528 DATA C9,22,82,85,89,62,11,92,94,99,11,48,98,22,49,215 
539 DATA 89,99,22,49,89,11,49,689,11,99,49,C9,09,22,89,366 
549 DATA 22,98,49,49,09,11,11,99,C0,49,00,49,00,98,90,284 
559 DATA C9, 49,89, 49,89, 22,90,09,49,C9,99,69,22,09,09,494 
569 DATA 49,49,909, 90,22, 09,00,49,09,49,09,22,90,98,49,184 
578 DATA 89,49,89,22,90,09,49,C9,09,89,22,00,09,46,49,384 
589 DATA 99,09,22,C0,00,49,80,49,00,22,C9,00,C8,88,48,444 





599 DATA 69, 22,09,60,C9,C9,06,89,22,09,49,C0,C9,89,99,594 
698 DATA 22,99,C9,C9,C9,C6,11,11,49,C9,C9,C9,C9, 88,98, 794 
619 DATA 92, 3A,C9,C8,08,00,90,69,06,67,31,C9, D9, 92,97, 3FF 
628 DATA B2, 99, 7D,E3,C9, C9, 89,99, 92,95, C9, 49,89, 4B,C8,699 
638 DATA C9,C9,80,49,89,08,C0,C9,C8,02,84,09, 49, C9, 89,686 
649 DATA C9,46,69,C9,99,C8, 89, C9, 49,B9,C9,80,C8,22,92,6A4 
659 DATA 95,09,62, 11,99, 49,89,09,11,49,99, 22,49, 89,09, 268 
669 DATA 22,49,89,11,09,99,11,99, 49,C9,99, 22,98,22,98,248 
679 DATA 49,49,06,11,11, 90,09, 49,99,49,02,04,90, 49,95, 168 
689 DATA 49,689,22, 99,99, 49, 00,00, 89,22,00,08,49,90,99, 294 
698 DATA 99,22,49, 86,49, 00,08,06,22, 49,89, 49,89, 99, 60,2C4 
799 DATA 22,99,99,40,C9, 09,09, 22,00,08, 49,49, 49,69,22,226 
719 DATA 99,08,49, 89,40, 89,22,60,96,C0,89, 09, 89,22, 09,384 
729 DATA 99,C9,C9, 89,99, 22,99, 49,C9,CD, 89,90, 22,98, C9, 4C4 
739 DATA C9,C8,C8,11,11,49,C9,C9,C9,C9,89,09,02,3A, C9, 71E 
749 DATA C9,09,99,99,09,00,67,31,C9,D9,92,97,B7,88, 73, 42D 
759 DATA E3,C9,C9,C9,90,49,02,04,C9,89,C0,90,92,04,C9,62F 
769 DATA 09,C9,98,49,92,02,C9,89,09,09,C9,00,02,02,C8,3C8 
779 DATA 49,80,99,C0,96,49,C9,49,89,00,99,C9,49,91,99, 4D1 
789 DATA 49,80,99,C9, 11,89, 22, 49,80,00,00, 22,89, 11,98, 3A6 
799 DATA 48,89,11,08,C0, 99,22, 49,89, 22,99,C9,89, 11,99, 3E6 
889 DATA 11,89,09, 89, 89, 99, 22, 22, 49,69, 89, 09, 48, 00,00, 205 
819 DATA 49,89,88,00,49,91,99,00,09,80,49, 00,91, 09,09, 362 
829 DATA 99,89,49,89,11,09,C9,09,60,99, 89,11, 99,C2,09,3E2 
839 DATA C9,99,09,11,99,00,00,C9,89,09,11,00,00, 09,69, 2A2 
849 DATA 89,89,11,49,69,96,C9,99, 89,11, 49,89, 49, C9, 08, 462 
859 DATA C9,11,99,99,49,C9,89,49,11,09,09,92,83,C8, 09,367 
869 DATA 11,99,49,92,93,C9, 89, 22, 22,02,05, CD, 09, 49,92, 2E3 
879 DATA 39,C,C9,90,09,00,08,99,67,31,C9,D9, 92, 97, BB, 4B4 
889 DATA 99,33,CA,C9,C9,C0,99,49,92,04,C5, BD, 22, 22,92, 589 
899 DATA 94,C9,98,11,99,49,92,02,C9,69,09, 11,89, 09, 62,26€ 
999 DATA 92,C9,89,90,11,C9, 99,49, C9,00,06,11,C9,68,49,3A4 
919 DATA 89,689,96,11,09,99,90,C0,89,09,11,09,09, 02, 02, 266 
928 DATA C9,68,89, 11,99, 98, 92,01,C9,68, 49,89, 11,98,C9, 425 
938 DATA 99,68,49,99,91,59,C0,09,86,09,49,91,C0,09, 99, 422 
949 DATA 69,80,49,11,C9,09, 00,69, 02,05, 90,02,01,C8, 88, 35B 
959 DATA 99,09,22,22,98,02,91,C9,88,09,11,09,11,09, 09, 1A9 
969 DATA 89,99, 22, 09, 09,22, 09,69, 11,08, 00,09, 11,99,88, LE6 
979 DATA 22,92,04,06,22,91,92,05,98,11,C0,00,09,C9, 00,273 
989 DATA 99,49,C9, 09,99, C9, 09,08, 49,C5, 89,02, 04,08,02, 348 
994 DATA 93,C9,90, 99,00, 49,92,03,C9,69,09,99,92,95, C9, 39F 
1990 DATA 99,49,92,39,C9,C9, 90, 00, 98,08,09,67,31, C9, DO, 435 
1919 DATA 92,97,B2,09,3D, D2,C9,C9,89,90,92,05,C9,11,11,4B3 
1928 DATA 49,C9,C0,C9, 89,98, 22,08,C8,C8,C0,08,09, 22,00,584 
1939 DATA 49,C9,69,09, 89,62, 89,00,C9,89,49,89,62,89,08,5C4 
1949 DATA C9, 49, 49,99, 22, 48, 80, 45,C8,00,08,22, 49,80, 49,444 
1959 DATA 89,99,09,22,00,49,C0,00, 00,09, 22,09, 49,C8, 90, 2C4 
1969 DATA 09,99,62,80, 98, 49, 90,06, 88,62, 89,08, 49, 00,49, 304 
1979 DATA 89,22,49,89,49,09,49,00, 00,49, 89,49, 49,08, 11,333 
1989 DATA 11,99, 49,C9,C9,08,22,08,22, 40,C9,88, 11, 99,29, 346 
1999 DATA 11,99,49,09,22,09,00,09,22,49,11,92,94,08, 11, 9FD 
1199 DATA 49,22,92,95,90,62, 88, 49,89,90,C9,98,C9, 89,49, 44B 
1119 DATA 89,49,C9,09,C9,C9,92,94,99,40,C9,C9,89,08,00,596 
1129 DATA 09,C9,C9,C9,C9, 90, 90, 49,C8,C8,C8, CB, 89, 09, 2, 6C2 
1139 DATA 3A,C9,C9,09,09,99,99,09,67,31,C9,D9, 92,97, B2, 4AF 
1149 DATA 99,B3,FC,CS,C#, C0, 08, 49,02,04,C9, 88,22, 22, 92,5BB 
1159 DATA 94,C9,99,11,99,49,92,02,C9,89, 09, 11,09, 99,92, 26C 
1169 DATA 92,C9,99,09, 11, 06,98, 49,C9,99, 98,11, 49,89, 49, 2E4 
1179 DATA 69,99,09,11,49,80, 09,89, 00,09, 11,99, 98, 09,89, 262 


1189 DATA 99,99, 11,00, 09, 08,69,08,68, 11, 99,08, 99, 69, 49, 1E2 
1199 DATA 89,11,99,09, 00,89, 49,09, 11,99, 00,99, 80,90, 00, 1E2 
1299 DATA 11,99, 09,06, BD, 92,04, 08, 45,60, 88,08,80, 22,22,21B 
1219 DATA 49,69,69,99,11,09, 11,99, 99, 89,09, 22,09, 09,22, 226 
1229 DATA 99,88, 11,99, 09,08, 11,98, 88, 22,92,84,B8,22,91,1FD 
1239 DATA 92,05,99,11,C9,49,89,C9, 49,89, 49,C8, 48,89, C9,598 
1249 DATA 49,89, 49,C9,89,02,04,00,02,03,C9,08,00, 09, 49,348 
1258 DATA 92,93,C9,89,00,09,02,05,C9,99, 49,92, 39,C9,CB, 487 
1269 DATA 09,09, 09,09,90,67,31,C9,D9,92,97,B2,88, BD, C5, 3C7 
1279 DATA C9,C8,89,09,92,95,C9,11,11,49,C9,C9,C9, 88, 90,5E9 
1289 DATA 22,99,C9,C8,C9, 60, 89,22, 98,49, C9, 88, 49, 89, 22,566 
1299 DATA 69,09,C9,89,49,09,22,C9,99,C9,49,09,09,22,CD, 404 
1399 DATA 09,49,C9,09,69, 22,98, 00, 49,80, 49,689, 22,09, 00, 344 
1319 DATA 48,08,49,09,22,09,00,49,49,00,00,22,00,00, ap, 184 
1329 DATA C9,09, 89,22,09,00,49,88,49,88,22,08,09, 40,99, 344 
1339 DATA 49,09,99,09,C0,49,49,09,11,11,99,C9,49,C0, 08, 362 
1349 DATA 22,09,22,09, 49,89, 11,49,88,11,09, 49,98, 22, 49,288 
1359 DATA 89,99,22,49,11,02,04,09, 11,49, 22,02,05,98,62, 1D5 
1368 DATA 89,C4, 09,99, 49,80,C8,88,C8,90,08,49,80,C9,C0,648 
1379 DATA 92,64,99,49,C05,C9,89,09,C8,09,C9,C9,C9, C8, 08,606 
1389 DATA C9, 49,C9,C8,C8,C9, 88,98, 92,3A,C0,C8, 09, 99, 00,63€ 
1399 DATA 69,99,67,31,C9,D9, 92,97, B2,99, 7D,EB, C4, C4,89,65D 
1499 DATA 99,92,95,C8,11, 11, 49,C9,C9, C9, 89,08, 22, 99,C9, 4CB 
1419 DATA C,C9,00,09, 22,09, 49,C9,89,00,8, 22,08, 09, C0, 484 
1428 DATA 89,49, 89,22, 00,08,C8, 49, 48,08,22, 08,00, 49,C9,3C4 
1439 DATA 69,09,22,09,00,49,60, 09,00, 22,00,08,40,98,00, 144 
1449 DATA 99,22, 49,89, 49,08, 00,00, 22,49, 80, 49,09, 00,89,2C4 
1459 DATA 22,09,09, 49,09, 49,89, 22, 09,09, 49,99, 49,02,04, 1CA 
1469 DATA 99,49, 49,96, 11,11,08,09,49,C9, 69,22, 99, 22,00, 1E6 
1479 DATA 49,89,11,99,09, 11,09, 49,00, 22,49,89,09, 22, 46,266 
1489 DATA 11,99, 49,69,98, 11, 49,22, 92,05,09,62,89, C9, 49,32D 
1499 DATA 88,C9,09,C9,89,C9,49,89,C9,09,C5,C9,92,94,08,646 
1599 DATA 49,C9,C9,89, 49, 89,089,C0,C8,C8, C9, 49,89, 49,9, 7C8 
1519 DATA C8,C9,C8,89, 09, 92,34, C9, C0,09,00,09,00,00,67,4E3 
1529 DATA 31,C9,D9,92,97,B7,98,73,E3,C9,C9,C8,98,49,92,66B 
1538 DATA 64,C9,89,22,22,92,94,C0, 99, 11,09, 49,02,92,C8,363 
1549 DATA 89,49, 11,08,99,02,92,C8,98,C8, 11, 98,90, 49, C9, 366 
1559 DATA 99,89,11,49,89,49,89,89,99, 11,49,89,99,C8, 89, 4A2 
1569 DATA 09,11,99,99,99,C8,08,09, 11,09, 09,00, 80,98,80,1E2 
1579 DATA 11,99,C9,09,89,49,89,11,99,C9,99,89,49,99,91,433 
1589 DATA 99,99, 99,89,99, 49,91, 090,09, 09,69,98,49,00,00,211 
1599 DATA 49,689,89,89,99,22,22,49,89,C9,86,11,99, 11,09, 426 
1699 DATA 09,C9, 99,22, 45,88, 22,00, 89,11,99,49,89,11,99,326 
1619 DATA 89,22,49,89,90,99,22,91,99,49,89,99,C8, 11, C9, 466 
1629 DATA 49,69, 09,96, C9, 49,C9, 49, 88,08, C9,99,49,C0,89,588 
1639 DATA 99,99,C9,09,92,03,C9,09,C8,09,49,92,03,C8,88, 3CA 
1649 DATA C9,09,02,05,C9, 69, 48, 92,39,C9,C8,08, 66, 80, 59, 382 
1658 DATA 99,67,31,C9,D9,95,93,95,99,C8,FC, 95, 1D, 93,93, 433 
1668 DATA 69,09,09,09,99,67,31,C9,D9,85,92,15,98,EF,D6,41B 
1679 DATA 92,93,92,83,92,C3,92, C6, 13,69, 02,83, 02, 83, 13, 3D8 
1689 DATA 89,99, C3,09,C3, 00, 09,89, 99,95,67,31,C9, D9, 85, 44E 
1699 DATA 93,1F,09,E7,D6, 03, 92,93, 93,82, 93, 43, 62,93, 46, 37D 
1799 DATA 82,93, 03,99,93, 03,82, 93,93, 62, 93,93, 99, 83, 43, 316 
1719 DATA 82,91,43,62,01,09,99,09,09,09,67,31,C9,D9, 95, 388 
1729 DATA 93,95,98,ED,FC, 95, 1D,C8,C8,09, 09, 08,09, 80,67, 3FA 
1739 DATA 31,C9,D9,85,92,17,98,6F,CC,89,95,91,C9,88, C8, 5BA 
1749 DATA 89, CC, 89,99, C4, 62, 89,C8,88,C8,C4,62, 88, CC, 99, 89D 
1759 DATA CC,89,89,99,00,68,67,31,C9,D9,95, 93, 2A, 98,67, 39F 
1769 DATA CC, C9,89,95,02,C9,88,95,91,C8,C4,88,85,81,C9,633 





1779 DATA 91,88,95,92,C9,66,95, 92, C9, 88,05,92,C9, 88,95, 4E9 
1789 DATA 82,C9,66,05,61,CD,C4, 88, 49,C4, 88, 49,00, 89, 90,596 
1799 DATA 98,09,67,31,C9,D9,95,93,95,09, 18,F8,95, 1D,3F, 3BB 
1899 DATA 3F,00,00,00,00,98,67,31,C9,D9,95,92, 15,9, 4B, 2DD 
1819 DATA C2,2A,3F,2A,B7,2A,F3,2A,E6,3B,9D, 2A,B7,2A,B7,6D3 
1829 DATA 3B,9D, 99,F3,09,F3,09,90,90,99,99,67,31,C9,D9,4F8 
1839 DATA 95,43,1F,09,56,C2,3F, 2A,3F,3F, A2, 3F, 7B, A2,9F, 463 
1849 DATA GE, A2, 3F,3F,99, 3F, 3F, A2, 3F, 3F, A2, 3F,3F,99, 3F, 5BD 
1859 DATA 7B,A2,15, 7B, A2, 15,99, 09,99,09,09,67,31,C9,D9, 49E 
1869 DATA 95,93,95,99,3D,F8, 95, 1D,9C, 9C, 99,00,69,99,90,17C 
1879 DATA 67,31,C9,D9,95,92,15,49,5F,C5,98,9C, 98, A4, 98, 442 
1889 DATA F9,98,E4,19,6C,98, A4, 08, A4, 19,8C,08,F9,89,F0,65E 
1899 DATA 99,89,09,09,99,67,31,C9,D9,95, 63, 1F,99,57,C5, 37D 
1999 DATA 9C,08,9C,9C, AD, 9C,58,AB,8C, 4C, AB, BC, 90, 99, BC, 385 
1919 DATA OC, A9,8C, AC, A9, 0C,9C,99, 90,58, AG,94,58, AB,94, 419 
1929 DATA 09,99, 09,09,09,67,31,C9,D9,85,93, 1F,99, BB, EG, 492 
1939 DATA 9F,0F,9F,05,03,9F,93,93,93,93, 83,63, 43, 43,93, 1DF 
1949 DATA 93,83,83,43,43,93,93,83,83, 43,43, 93,03, 83,83, 42D 
1959 DATA 09,00,99,09,09,67,31,C9,D9,96,93, 22,98, BB,E6, 486 
1969 DATA 9F,0A,9F,0F,62,9F,43,82,93,46,82,93,93,99, 93, 2FA 
1979 DATA 93,82,03,03,82,03,43,99,93, 43, 82,91, 43, 82,91, 33B 
1988 DATA 93,03,93,06,09,00,00,00,67,31,C9,D9,96, 893, 1F,26B 
1999 DATA 99,1B,C6,0F,4F,6F,6F,0F,0F,3C, 30, 2D, 29,93, 97,353 
2998 DATA 29,93, 097,29,93,97, 29,93,97,29,93,87,29, 93,87, 8FF 
2919 DATA 29,93,87,00,00,09,00,99,67,31,C9,D9,96, 93, 1F, 295 
2929 DATA 09,6B,D6,8F, 9A,9F,6F,62,9F,43,82,97,46, 82,97, 4A4 
2939 DATA 93,99,97,93,82,07,93,82,07,03,99,97, 43,82, 95, 328 
2848 DATA 43,82,05,09,08,00,08,09,67,31,C9,D9, 95,83, 1F,32B 
2959 DATA 99,89,D3,8A, 8F, BF, 8A,87,9F,2A,C3,6F,2A,C6, 2F,69F 
2968 DATA 3B,9D,6F,2A,97,2F,2A,97,6F, 3B,9D,6F,99,C3,2F, 5Aÿ 
2979 DATA 99,C3,2F,09,09,09,99,09,67,31,C9,D9,96, 93, 1F, 354 
2989 DATA 99,9C,EA,06,93,9F,CF,CF,8F, 3C, 30, 20, 3D, 3F,2F,51B 
2999 DATA 3D,3F,2F,3D, 3F,2F, 3D,3F,6F,3D,3F,2F, 3D, 3F,6F, 3D7 
‘2199 DATA 3D,3F,6F,99, 09,06, 08,08,67,31,C9,D9, 86,94, 2E, 35D 
2119 DATA 09,98,EA,0F,0A,06,02,8F,1F,2A,97,2F,1F,2A,C3, 3CD 
2124 DATA 6F,1F,2A,C6,2F,1F,3B,9D,6F,1F,2A,97,2F,9F,2A, 4EB 
2139 DATA 97,6F,1F,3B,9D,2F,9F,99,C3,6F,9F,99,C3,2F,9F,62D 
2149 DATA 3F,3F,6F,09,09,60,08,09,67,31,C9,D9, 96,84, 20, 35D 
2159 DATA 99,98,EA,96,94,0F,1F,3F,3F,2F,1F,3E,3E,6F, 1F, 399 
2168 DATA 3D,3D,2F,1F,S3E,S3E,6F,1F,3D, 3D,2F,9F,3E, 3E,6F, 495 
2178 DATA 1F,3D,3D,2F,9F,3E,3E,6F,9F,3D, 3D,2F,9F,3F,3F, 4B7 
2188 DATA 6F,09,09,00,06,09,67,31,C9,D9, 96,93, 1F, 09, 81,352 
2199 DATA C8,9F,95,9F,4F,41,8F,0E, 41,86,BE,41,8C,8E,66,52E 
2299 DATA 8C,9E, 41,90, BE, 41, 9C,8E,66, 2C, DA, 41, 86, BA, 41, 35E 
2219 DATA 86,99,99,09,09,09,67,31,C9,D9,95,93,1F, 98,81, 368 
2224 DATA C8,0F,6F,9F,4F,6F,8F,1E, 3C, 3C,9E, BC, 8C, 9E, 8C, 4D8 
2238 DATA GC, LE, 0C, AC, 9E, 9C, 9C,9E, 9C, QC, 1E,9C, OC, 1E, 9C, 29E 
2249 DATA 8C,98,09,00,099,98,67,31,C9,D9, 95,93, 22, 8, 88, 2F8 
2259 DATA C9,CF,45,8F,4F,41,8F,9C,41,86,9C, 41,80, 9C, 66, 5Aÿ 
2268 DATA 4C,9C,41,9C,0C, 41, 9C,9C,66, 90, 98, 41,86, 88, 41,254 
2279 DATA 86,9C,4C,0C,09,00,00,09,99,67,31,C9,D9,95,#3, 2EC 
2289 DATA 22,09,88,C8,CF,CF,8F,4F,6F,6F,9C,9C, 80, BC, A4, 5D8 
2299 DATA A4,58,58,9C,8C, A4, A4,58,58,9C, 9C, A4, A4,58,58,574 
2309 DATA OC, 8C, A4, A4, 9C,9C, OC, 90,00, 88,98,88,67,31,C9,2E5 
2319 DATA D9,96,93,29,09,BB,EA, 8A,96,92,9F,8A,87,9F,98, 479 
2328 DATA C3, 8D, 98, C6, QD, 19, 8C, 9D, 98, 86, SD, 58, 86, BD, 19, 3AC 
2338 DATA 8C,4D,99,C3, 4D, 89, C3, 9D,99,09,00,09,90,67,31,351 
2349 DATA C9,D9, 96,93, 1F,99,D8,D8,CF,4F,CF,CF,CF,CF,3C, 819 
2359 DATA 3C,2D,2C,4C, 4D, 2C, C, 4D, 20, 9C, 4D, 2C, #C, 4D, 2C, 2A9 


2369 DATA 9C,4D, 20,80, 4D, 2C, 90, 9D, 88, 98,99,80,09,67,31, 1BB 
2379 DATA C9,D9,96,93, 1F,99,BA, D3, 9F,6F,6F,9F,4F,CF,3C, SED 
2389 DATA 3C,2D,68,C8,C5,68,C8,85,68,C9,85,68,C8, 85,68, 7C5 
2399 DATA C9,85,68,C9,85,68,C9,85, 99,09, 00,09,98,67,31,537 
2499 DATA C9,D9, 96,93, 1F, 98, BA,D3,9F, BA, 6F,0F,82,CF,C1,6A8 
2419 DATA 82,85,C4,82,C5,C8, 99,5, C5, 82,85, C9, 82,85,C8,93E 
2429 DATA 99,85,C1,82,95,C1, 82,05, 08,08, 98,08,99,67,31,446 
2439 DATA C9,D9,96,93, 22,89, AA, C4, 4F, BA, 9F,C9,82,C8,C1,6E6 
2449 DATA 82,C9,C4,82,CD,C9,99,C8,C9,82,CB,C8,82,C9, C8, A25 
2458 DATA 99,C9,C1,82,49,C1,82,49,C9,C8, C9, 09,08, 08, 08,69F 
2469 DATA 99,67,31,C9,D9, 96,93, 22,98, AA, C4, 4F,CF,8F,CC, SCC 
2479 DATA CC,CC,CC,C4,C4,CB,C8,CC,CC,C4,C4,C8,C8, CC, CC, BC4 
2489 DATA C4,C4,C8,C8,CC,CC,C4,C4,C8,C8,CC,CC, CC, CC, 99, AF8 
2498 DATA 99,09,99,99,67,31,C9,D9, 96,93, 1F,99,C1,E6,8F,418 
2598 DATA 9F,45,9F,4B,95,9B,C3,91,9B,C9,91,0B, 46, 23, 9B, 2D6 
2518 DATA 43,91,0B,43,91,0B, 46,23, 0B,C3, 9,9B,C3, 99,09, 243 
2529 DATA 99,99,09,09,67,31,C9,D9, 96,93, 1F,88,C1,E6,9F,418 
2539 DATA 9F,4F,96,03,0F,1E, 3C, 3C, 1E, 93,03, 1E, 03,93, 1E, 172 
2549 DATA 93,03, 1E, 03,93, 1E, 93,93, 1E, 93,93, LE, 03, 03,90, 096 
2558 DATA 09,09,99,09,67,31,C9,D9, 19,92, 13,99, 72, D6,9F, 3B6 
2569 DATA 95,4B,45,C3,95,4E,67,4B,95,CB,95,4E, 27, C3, 90, 46A 
2579 DATA C3,09,08,09,09,09,06,67,31,C9, D9,99, 92, 15,98, 31D 
2588 DATA 72,D6,9F,0F,68F,4F,4F,8F,0F,4F,9F, 8F,CF,8F,9F,50B 
2599 DATA 8F,0F,CF,09,91,93,03,09,00,09,00,09,67,31,C9, 2DE 
2699 DATA D9,99,93,22, 96, AA, C4, 4F,8A,8F,C9,88,C8,C4,88,6B1 
2619 DATA C9,91,88,C89,C9,66,C9,C9,BB,C9,CS,88,C8,C8,66,9B5 
2629 DATA C9,C4,88,49,C4, 88, 49,C8,C8,C8,08,09,90,00,00,618 
2639 DATA 67,31,C9,D9,99, 93, 1F,99, BA, D3,9F,6A,8F,9F,68,5B1 
2649 DATA CF,C4,88,85,91,88,C5,C8,66, 85, C8, 8B,85,C4,88,93E 
2658 DATA 85,C9,66,85,C4,88,05,C4, 88,05, 90, 06,98, 09,69, 4D2 
2669 DATA 67,31,C9,D9, 99,93, 1F,99,C1,E6,9F,0F, 45, 9F, 4E, 4CC 
2679 DATA 95,9B,CC,91,9B,66,01,0B, 13,89, 9B, 46,91, 9B, 46, 299 
2688 DATA 91,89B, 13,69, 9B, CC, 99,98, CC, 96, 90,08,09,89, 99,256 
2698 DATA 67,31,C9,D9, 99,93, 22,99, BB,E6,9F,9A,0F,9F, 88, 4CB 
2798 DATA 0F,46,88,93, 13, 88, 93,93,66, 93,93, 86,93, 93, 88, 393 
2719 DATA 93,03,66,03, 46,88, 91,46, 88,91,93,03,03,09, 00,216 
2728 DATA 09,69,09,67,31,C9,D9, 99,93, 1F, 99, 1B,C6, 8F, BA, 35F 
2739 DATA 8F,68F,88,0F,46,86,97,13,88,97,93,66,97,93, 88,427 
2749 DATA 97,03, 88,97,03,66, 97,46, 88,95, 46,68, 95, 99, 99, 2AF 
2759 DATA 09,99,09,67,31,C9, D9, 99, 93, 1F,99,89, D3, 8A, 8F, 4DA 
2769 DATA BF, BA, 8D,0F,2A,CC,6F,2A,99,2F,6E,37,6F, 24, 9D,5E7 
2779 DATA 2F,2A,9D,6F,6E,37,6F,99,CC,2F,09,CC,2F,08,06, 46F 
2789 DATA 89,99,99,67,31,C9,D9,99,94,2E,90,98,EA, BF, SA, 419 
2798 DATA 99,92,9F,1F,2A,9D,2F,1F,2A,CC,6F,1F,2A,99,2F, 3C4 
2899 DATA 1F,6E,37,6F,1F,2A,9D,2F,9F, 2A,9D,6F,1F,6E, 37, 4E1 
2819 DATA 2F,9F,98,CC,6F,9F,99,CC,2F,9F,3F,93F,6F,98,09,52F 
2829 DATA 99,09,99,67,31,C9,D9,99,93,1F,99,81,C8,8F, 95, 3C2 
2838 DATA @F,4F,44,6F,0E, 44,80, 6E, 44,26, 8E,99, QC, DE, 44, 48C 
2849 DATA 0C,BE, 44,9C,8E,99,9C, DA, 44,6C, BA, 44, 8C, 99,99, 3D1 
2858 DATA 99,09,99,67,31,C9,D9,99, 93, 22, 99,88, C9, CF, 45, 4C4 
286$ DATA BF,4F,44,8F,9C,44,8C,9C, 44,26, 90,99, 80, 8C, 44,494 
2879 DATA 8C,4C,44,9C,9C,99, C,98, 44, 8C, 98, 44, BC, OC, fC, 2E1 
2889 DATA 0C,09,00,06,06,94,67,31,C9,D9, 99,93, 28, 89, BB, 32D 
2898 DATA EA, 8A,99,92,0F, BA, 8D, 8F, 98, CC, 9D, 98,99, GD, 4C, 48F 
2999 DATA 26, D, 98,6C, 9D, 98, 8C, BD, 4C,26, 4D, 88, CC, 4D, 89, 34D 
2919 DATA CC,6D,99,09,09,89,89,67,31,C9, D9, 99, 02, 15,98, 333 
2929 DATA B7,D3,CF,95,CE, 95, CC,95,66,95, 1B, BD, 4E, 95, CE, 636 
2938 DATA 85,1B,8D,CC,99,CC,99,09,06,09,08,99,67,31,C9, 3A6 
2948 DATA D9,99, 92, 15,98,B4,D3,0F,9F,CF,4F,6F,CF,4F,CF,638 
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3828 
3639 
384 
3459 
3864 
3879 
3084 
3899 
3194 
3119 
3128 
3138 
3149 
3158 
3164 
3178 
3189 
3198 
3290 
3219 
3228 
3238 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 


324$ DATA 


3259 


DATA 


3264 DATA 


3279 
3289 
329ÿ 
3388 
3319 
3324 
3339 
3344 
3358 
3360 
3378 
338$ 
3399 
3489 
3418 
3429 
3439 
3449 
345ÿ 
3469 
3479 
3489 
3499 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 





8F,4F,4F,CF,CF,CF,9F,4F,4F,9F,6F,6F,00,90,00,57à 
80, 90,67,31,C9, DO, 99,93, 22,08,88,C8,CF,45,8F,553 
4F,59,8F,0C,58, A4,4C,58,8C,4C,66, 0C, AC, 58, 8C, 3FC 
aC,59,0C, DC, 66,90, 98,50, Aa, 06,58, Ad, BC, AC, EC, 392 
06, 00,09, 09,09,67,31,C9,D9, 09,03, 20, 09, BB, EA, 40E 
84, 99, 92,0F,8A, A5,0F,06,F0,4D,08,E4,0D, 19, AC, 485 
gD, 98, A4, 0D,98, A4, 0D, 19,8C,4D, 09, F4, 4D, 09, FD, 49E 
ab, 99, 09,90,00,00,67,31,C9,D9,09,03,1F, 99, BA, 32C 
D3,0F,84,6F,0F, A9, CF, D9,A9,85,C4,A8,C5, CD, 99, 8F8 
85,C, A9,85, C9, AB,85,C8,99,85, DO, 8,95, DA, A9, 912 
05, 09,20,08,09,00,67,31,C9,D9, 99,93, 22, 98, AA, 317 
Ca,4F,84,0F,C9, A8, CB, D9, AB, CB, C4, AB, CB, CA, 99, 979 
CA, CP, A8, C9,CB, A9, CO, CO, 99, CA, DO, A9, 49, DB, AB, A39 
49,C8,C8,C0,00,00,08,00,00,67,31,C9,D9, B6, 03, 4C3 
1F,00,C1,E6,0F,0F,45,0F, SA, 05,0B,F4,01,0B, DB, 476 
81,98, 46,23,9B,52,01,0B,52,01,6B,46,23, 08, FO, A9 
09,0,F0,09,00,00.00,09,00,67,31,C9, D9, 06,03, 33€ 
22,89,BB,E6,9F,94,0F, UF, A8, 0F,52, 8,03, 46, A, 484 
03,03,09, 43,03, A0, 03,03, A9,03,03,99, 93,52, A, 37F 
81,52, 40,01,93,93,93,00,08,00,09,08,67,31,C9,25E 
DS, 06,93, 1F,49,1B.C6,0F, OA, BF, BF, A8, 0F, 52, AB, 4BA 
87,06,46,07,93,99,07,03,A8,07,03, 18,07, 83,99, 387 
07,52, 9,05,52, 49,05, 00,00,00,09,00,67, 31,C9, 356 
D9, 06,03, 1F,90,89, 03,64, 6F,8F, BA, A5, #F, 2A,FO,65D 
6F,2A,E4, 2F, 38, 9D, 6F, 2A,B5, 2F, 2A,B5,6F, 38, 9D, 627 
6F, 90, F4, 2F,00,F8, 2F,00,00,00,00,60,67,31,C9,49E 
D9, 96, fa, 2E, 49,98, CA,0F,0A,06,02,0F, 1F, 2A,B5, 3C! 
2F,1F,2A,F8,6F,1F,2A,E4, 2F, 1F, 38, 90,6F, 1F, 2A, 4E2 
85, 2F,9F,24,B5,6F, 1F, 3B, 9D, 2F,0F,09,F4,6F,0F, 694 
90,F0, 2F,0F,3F,3F,6F,00,00,00, 09, 08,67, 31, C9, 40C 
D9, 06,03, 1F,00,81,C8,0F,95,0F,4F,54,8F,0E, 59, 3F9 
A4,6E,54, 8C,8E,66, 0C, DE, 58,00, 8E,58, 80, 8E, 66,556 
ÛC, DA ,58,Aa,84,50,A4,00,00,00,08,08,67,31,C9, 369 
D9, 26,93,1C,29,D1,F8,4F,05,4F,CF,59,A5,CF, 59, 64D 
CD,0F,66,0F,8F,50,8F,8F,59,8F,4F,66, 8F, 9,50, 5CE 
ES, 48,59, A4, 00,00,08,00,00,67,31,C9,D9, D6, 03, 424 
1D,09,71,C9,96,03,0F,4F,CF,8F,9F,4F,0F,CF,CF,527 
0F,CF,4F,0F,0F,4F,0F,4F,8F,4F,8F,0F, BF, #6, 82, ADR 
oc, 0C,09,09,90,09,09,67,31,C9,D9,06,03, 1F, 90,274 
89, D3, 84, BF, 8F, 84, A7,9F,2A,F3,6F,2A,E6,2F, 3B, 744 
9D,6F, 24, B7,2F,24,87,6F, 38,90, 6F,09,F3, 2F, 08, 5D5 
F3,2F, 09,00, 90,00,90,67,31,C9, 09,6, a, 2E, 09, 394 
98,FA,0F,04,06,92,0F,1F,2A,B7,2F,1F, 2A,F3,6F, 4BC 
1F,2A,E6,2F,1F,3B,00,6F,1F, 2A,B7,F,0F, 24, B7, 573 
6F, 1F, 38,90, 2F,9F,90,F3,6F,9F,90,F3,2F,9F,3F,635 
3F, 6F, 94,00,08,00,08,67,31,C9, D9, 06,43, 1F,80, 319 
81,C8,0F,05,0F,4F,51,6F,0E,51,46,8E,51,8C,BE, 599 
66, 2C, 0E, 51, 0, 8€, 51, 0C,8E,66, 90, 4,51, A6, 84, 303 
51,A6,08,99,09,09,09,67,31,C9,D9, 06,93, 22,9, 35C 
88,C8,CF,45,6F,4F,51,8F,0C,51,A6,4C,51,8C,9C,612 
66,0C,8C,51,8C,0C,51,0C,0C,66,0C, 98,51, A6,98, 2C9 
51,46, 0C,0C, 4C, 99, 00,08,08,90,67,31,C9,D9, 86, 35B 
93, 29,00, BB, EA, 84, 86,92,0F,8A,A7,0F,08,F3,0D, 4B1 
88, E6, 9D, 19,8C, 90,98, A6,9D,98, A6, 40,19, 8C, 4D, 415 
58,F3,4D, 09,F3,4D,09,00,09,00,09,67,31,C9, D9, 474 


3599 DATA 96,93, 1F,98,BA, D3,9F,8A,6F,9F, A2,CF,D1, A2, 85,655 
3519 DATA C4, A2,05,C9,99,85,C9, 2,85, C9, A2,85,C9,99, 85, 9B5 
3529 DATA D1,42,05,D1,A2,95,96,90,08,09,99,67,31,C9,D9,52A 
3538 DATA 96,93,22,98,AA,C4,4F,8A,9F,C9, A2,C9,D1, A2,C8, 6D6 








3549 DATA 
3558 DATA 
2564 DATA 
3574 DATA 
3584 DATA 
3594 DATA 
2680 DATA 
2614 DATA 
36/9 DATA 
3638 DATA 
3644 DATA 
3654 DATA 
3668 DATA 
3674 [iATA 
3684 DATA 
369% DATA 
3796 DATA 
3719 DATA 
5729 DATA 
:73g DATA 
:74ÿ DATA 
2769 DATA 
3764 DATA 
377ÿ DATA 
3789 DATA 
3799 DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
L'ATA 





iN 


C4,42,C4,Cd,99,C0, C8, A2,C8,C4, A2,C9,C8,99,C8, AC 
Di,4A2,49,D1,AZ,49,C6,C0,C0,00,00,00,00,00,67,68D 
31,C9,D9,96,43,1F,94,C1,E6,0F,0F,45,0F,5E,85,474 
9E,F3,41,0B,D9,91,9B,46,23,9B,53,91,9B,23,91,316 
9B,46,23,08,F5,99,9B,F5,00,00,09,00,00,04,67,2D7 
31,C9,09,96,43,22,99,BE,EC,9F,UA,DF,QF, A2,9F, 487 
53,A2,03,46,A2,03,03,90,93, 93, A2, 03,43, A2, 83, 3D2 
95,90,93,53,A2,01,53,A7,91,93,05,43,09,90, 08,294 
89,u9,67,31,C9, D0,96,43,1F, 4, 1B,C6,9F, 0, 8F, 3EB 
8F,AT,0F,93,A2,97,46,A7,07,93,99,47,93,A2,97,47A 
83,42,07,03,99,97,53,A2,05,53, 2,45, 09,09, 00,343 
98,09,67,31,C9,D9,06,953,1F,99,8C,DG,2F, 45,4F, 484 
2F,51,C0F,2F,51,A7,2F,51,8D,2F,66,9F,2F,51,9F, 4B6 
2F,51,0F,2F,66,4F,2A,51,E7,2A,51,E7,90,90, 08,437 
39,09,67,31,C9,D9,96,93,1F,00,8F,D3,6F,0F,8F, 4D1 
6F,8F,0F,2F,4F,4F,6F,CF,0F,0F,0F,4F,2F,0F,0F,441 
2F,4F,àF,6F,4F,4F,2F,CF,8F,2F,0F,8F,40, 80,00, 434 
62,49,67,31,C9,D9, 96,92, 15,99, A2,E3,0F,95,CB, 4BB 
95,03,05,03,95,4E,27,CB,45,4B,95,CE,27,C3, 00,528 
C3,89,00,09,09,09,08,67,31,C9,D9,95, 02, 15,90, 319 
A2,ES, 8A,BF,9A, A7,8A,F3,DA,E6, 1P,8D, 8A,E7, QA, 75F 
A7,1E,8D,06,F3,09,F5,09,94,00,90,08,67,31,C9, 496 
D9,45,82,15,40, A2,E3,0A,8F,QA,A5,8A,F0,8A,F4,62A 
1B,8D,8A,E5,9A,A5,1B,8D,98,F0,94,F9,90,90,99,54E 
89,94,67,31,C0,D0,96,92,15, 98, A2,F3,8F, 05, 4E, 43E 
g5,CC,45,66,85,1B,8D,CE,45,4E,95, 18, 8D,CC, 94,583 
CC,06,09,60,00,08,90,67,31,09,D9,81,95, 48,98, 354 
48,CB,41,07,4F,4F,4F,CF,9F,0F,CF,CF,CF,4F,6F,658 
9F,0F,9F,0F,CF,CF,6F,CF,4F,4F,4F,@F,4F,DF,CF,521 
CF, 9F,0F,CF,CF,0F,8F,8F,CF,4F,6F,CF,8F,8F,8F, 761 
8F,6F,0F,CF,8F,CF,9F,CF,8F,8F,8F,4F,4F,8F,4F,0A! 
8F,4F,0F,9F,8F,08F,89F,GF,9F,0F,CF,CF,8F,08, 64,593 
09,06,00,0F,8F,4F,8F,8F.8F,0F,CF,6F,8F,üF,2F.4F4 
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TRANSFERT DE FICHIERS 
ENTRE DES DISQUETTES 
À FORMATAGE STANDARD 
DU SPECIAL 


Yannick GOUR 





Valable pour CPC 664 - 6128 


Le programme proposé 
permet de transférer des 
fichiers BASIC, binaire 
ou ASCII entre des 
disquettes de formatage 
quelconque, que ce soit 
sur un lecteur À, ou B 
ou entre les deux. 


PREAMBULE 


L'utilitaire proposé est donc un 
transféreur de fichiers. || est certes 
moins pratique d'utilisation que 
certains utilitaires CP/M ou que DIS- 
COLOGY, mais il est beaucoup plus 
performant car il peut travailler 
avec toutes sortes de formatages 
(ce que ne savent pas faire DISCO- 
LOGY et d'autres). Cet utilitaire, 
baptisé TRANSFIL, fait suite à FOR- 
MAT, utilitaire de formatage dans 
le format de son choix, et à la série 
de programmes proposés pour l’ex- 
ploitation de disquettes à formata- 
ge spécial. 


La lecture de l'article concernant 
ces derniers est fortement conseillée 
pour comprendre comment sont 
déterminés les formatages sur les 
CPCSs. 


MISE EN OEUVRE 


1) Tapez le programme TRANSFIL. 
BAS et sauvegardez-le. 


2) Remettez à zéro le CPC, puis ta- 
pez le programme CHARGEUR.BAS. 
Ensuite sauvegardez-le, par pru- 
dence, avant de le lancer. Au bout 
d'une vingtaine de secondes, si tout 
va bien, le fichier binaire 
TRANSFIL.COD est sauvegardé. Le 
chargeur détecte 2 types d'erreurs : 
une erreur dans une donnée où une 
interversion de données dans une 
ligne (pour peu que les données in- 
terverties ne soient pas de même 
parité). Dans un tel cas le program- 
me s'arrête avec indication du type 
d'erreur et de la ligne erronée. || faut 
alors la corriger et le chargeur peut 
ètre relancé par un “RUN 160”. 


3) Pour travailler vous n'avez plus 
besoin désormais que des fichiers 
TRANSFIL.BAS et TRANSFIL.COD, sur 
une même face de disquette natu- 
rellement. 


CHOIX DES 
FORMATAGES 


1) Mise en route de TRANSFIL : après 
avoir remis à zéro le CPC, lancez 
TRANSFIL.BAS. Suit une attente de 3 
ou 4 secondes pendant laquelle le 
magnifique écran de choix est créé. 
N.B.: je parlerai de blanc ou de noir 
pour les couleurs, ce qui sera évi- 
dent pour le possesseur d'un écran 
couleur : le possesseur de mono- 
chrome traduira alsément cela en 
clair ou obscur. Le possesseur de 
moniteur couleur, généralement 
beaucoup moins net en haute ré- 
solution qu'un monochrome, modi- 
fiera à sa convenance les couleurs 
en ligne 250. 


17 


2) Choix des formatages : la partie 
intéressante est le tableau central 
où apparaissent dans une ligne et 
dans une colonne les différents for- 
matages connus de TRANSFIL (pour 
l'adaptation à ses formatages per- 
sonnels voir le chapitre PERSONNA- 
LISATION DE TRANSFIL). Les noms sont 
blancs sur fond noir, sauf pour les 2 
DATA”, noirs sur fond blanc et pour 
la case à l'intersection de leurs li- 
gne et colonne. 


Dans cette version de TRANSFIL, on 
a le choix entre DATA (format de 
données standard), VENDOR (for- 
mat système standard), DATA+ (ex- 
trapolé de DATA en ajoutant un 
secteur de numéro CA et en utili- 
sant les pistes 40 et 41, ce qui donne 
208 KO de capacité), DB1-198K 
(même formatage par piste que 
pour DATA+, mais restreint aux pis- 
tes 00-39) et DB2-198K (même cho- 
se que DB1-198K sauf qu'il s'appli- 
que entre les pistes 40 et 79 : ce 
format n'a donc d'utilité que sur un 
lecteur 80 pistes. Avec DB1-198K, il 
permet de partager une disquette 
80 pistes en deux disquettes virtuel- 
les de 40 pistes, avec tout le profit 
que l’on peut en tirer, surtout si on a 
lu mon article sur les trucs pour l'ex- 
ploitation de disquettes à formata- 
ge spécial en lecteur A ou B). Com- 
me indiqué sur la ligne sous le ta- 
bleau, on change de sélection au 
moyen des touches curseur. Un 
coup à droite et on passe à DATA+ 
sur la ligne, un coup en haut et on 
passe à VENDOR (le tableau est dé- 
fini circulairement ; on saute d’un 
bord à l'autre, ce qui est plus 
agréable). La case du tableau à 


l'intersection des ligne et colonne 
des formatages sélectionnés est 
toujours “allumée”. Pas besoin 
d'être Einstein donc pour compren- 
dre comment choisir deux formata- 
ges. 


3) Validation du choix : comme écrit 
à l'écran, il suffit de taper ENTER ou 
RETURN. L'écran s’efface alors et on 
doit patienter 3 où 4 secondes 
avant que l'écran de transfert 
n'apparaisse. 


TRANSFERT 
DE FICHIERS 


1) Description de l'écran : l'écran 
est composé de 4 parties qui sont, 
de haut en bas : 


a) le bandeau supérieur avec le 
nom, le numéro de version et le co- 
pyright à gauche et des indications 
beaucoup plus intéressantes à drol- 
te, à savoir : les formatages choisis, 
les lecteurs et users actuellement 
actifs ainsi que le sens de transfert. 
Par exemple on lira : A(O):DATA 
B(A):DATA+, Cela signifie qu'on 
transfère du lecteur A/User 0 en for- 
mat DATA vers le lecteur B/User 10 
en format DATA+. 


b) la fenêtre source, surmontée 
d'une ligne en gris avec "SOURCE" 
Inscrit dessus. C'est Ici que s'affi- 
cheront le catalogue ou le directo- 
ry de la disquette source. 


©) la fenêtre destination, surmontée 
d'une ligne en gris avec *DESTINA- 
TION” Inscrit dessus. C'est ici que 
s'afficheront le catalogue ou le di- 
rectory de la disquette destination. 


d) la fenêtre du menu principal ou 
des messages pour les transferts ou 
effacements. Le menu principal est 
en fait le seul qui solt. Il indique les 
commandes de modification des 
paramètres de transfert, de copie 
et d'effacement. On va sans plus 
tarder les décrire. 


2) Modification des paramètres de 
transfert : 


TAB : inversion du sens de copie. 
Bien évidemment la flèche désigne 
le formatage de la disquette desti- 
nation. Ceci explique que le choix 
dans le tableau au début se fait 
sans Indication de sens. En prenant 
DATA en ligne et VENDOR en colon- 


ne, ils se retrouvent seulement pla- 
cés dans le bandeau supérieur res- 
pectivement à gauche et à droite. 
A l'origine le transfert se fait donc 
dans le sens DATA->VENDOR mais 
une pression de le touche TAB suffit 
à l'Inverser. 


< (touche curseur) : permutation du 
lecteur source, qui passe de A à B, 
et vice versa. 


— (touche curseur) : permutation du 
lecteur destination, qui passe de A 
à B, et vice versa. 


T (touche curseur) : incrémentation 
du User source. || y a retour après 15 
à 0. Le numéro est exprimé en 
héxadécimal (chiffres O, 1,2,3,4,5, 
6,7,8,9,A,B,C,D.E,F). 


Ÿ (touche curseur) : incrémentation 
du User destination. Mêmes remar- 
ques que pour le User, source. 


3) Catalogue ou directory 


F1 (touche du pavé numérique ou 
bien touche 1 du clavier !) : permet 
de cataloguer la disquette source. 
La fenêtre source est effacée et un 
message invite à insérer le disc 
source, avant de presser une tou- 
che pour lancer le catalogue. Le 
catalogue apparaît ensuite. Une 
remarque d'ordre général : les 
messages d'erreur éventuels dûs à 
l'AMSDOS ne sont pas détournés et 
sont ceux sous BASIC. Il ne doit donc 
pas y avoir de difficulté pour y réa- 


gir. 


On peut Interompre cette opéra- 
tion lors de l'attente de touche en 
pressant la touche ESC, auquel cas 
s'affiche dans la fenêtre de catalo- 
gue ** Abandon *”. || y a retour alors 
au menu. 


F4 (touche pavé numérique où bien 
touche 4 du clavier 1) : permet de 
faire le Directory (fichiers sans Indi- 
cation de taille) de la disquette 
source. Même processus que pour 
F1. 


F2 : fonction similaire à F1, mais pour 
le disc destination. 


F5 : fonction similaire à F4, mais pour 
le disc destination. 


4) Effaçage de fichier 


ll suffit de presser la touche DEL. Le 
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menu en bas s'efface, remplacé 
par une phrase invitant à insérer le 
disc source dans le lecteur adéquat 
et à taper le nom du fichier à effa- 
cer. À noter que cette opération 
n'est faisable que sur le disc source. 
SI, par exemple, on vient de transfé- 
rer par erreur Un fichier, Il suffit d'In- 
verser le sens de copie pour pou- 
volr l'effacer. 


Le nom du fichier est saisi sur la 
deuxième ligne. Les minuscules sont 
automatiquement converties en 
majuscules. Les caractères admis 
sont entre l'espace et le Z, ce qui 
comprend tous les caractères 
autorisés par l'AMSDOS. On ne peut 
entrer plus de 12 caractères. La 
touche DEL permet d'effacer le 
dernier caractère entré. Une pres- 
sion de la touche ESC interrompt le 
processus et il Y a retour au menu. 
Les jokers ("?” et **") sont autorisés: 
c'est en fait comme sous BASIC. Une 
pression de la touche ENTER (ou RE- 
TURN selon le CPC) valide pour l'ef- 
façage le nom entré (si un nom a 
blen été entré, sans quoi c'est Ino- 
pérant). Puis s'affiche en dessous 
“efface...”. || ÿ a enfin retour au 
menu après exécution de la routine 
d'effaçage. 


5) Transfert de fichier 


Presser la touche ENTER ou RETURN. 
Insérer le Disc source dans le lec- 
teur adéquat puis entrer le nom du 
fichier à transférer. Toutes les remar- 
ques pour la saisde du nom de fi- 
chier à effacer sont valables ici, 
hormis celle pour les Jokers. On 
transfère les fichiers un par un et il 
ne peut y avoir d'ambiguïté sur le 
nom. 


Une fois le nom validé, un message 
sur la troisième ligne, “lit...”, Indique 
l'opération de lecture. Si le fichier 
est introuvable, Il y a retour Immé- 
diat à la saisie d’un nom de fichier. 
Si une erreur de lecture apparaît, 
alors la copie est interrompue. || y a 
affichage sous ‘Iit.” de “* Aban- 
don “” et attente d'une pression de 
touche pour saisir un nouveau nom. 
Ceci peut se produire “aisément” sl 
on tente de lire, par exemple, une 
disquette formatée en DATA com- 
me sl elle l'était en DATA+. 


Cela arrive aussi dès le début si un 
fichier BASIC ou binaire est trop long 
ou en cours de lecture si un fichier 
ASCII l'est (cf remarque no 1). 


La lecture achevée, Il est demandé 
d'insérer le disc destination dans le 
lecteur adéquat, puis de presser 
une touche pour lancer l'écriture. 
On peut ici aussi interrompre le pro- 
cessus en pressant ESC, pour retour- 
ner aussitôt à la saisie de nom. Le 
processus d'écriture est signalé par 
le message “écrit... 


Un problème lors de cette opéra- 
tion se traduit comme pour la lectu- 
re par un message d'abandon. 
Lorsque l'écriture est finie, il y a re- 
tour à une nouvelle saisie de nom. 


Remarques: 


1) les fichiers sont coplés en une 
seule fois. Aussi sont-ils "limités" en 
taille pour les fichiers BASIC et BI- 
NAIRE à environ 42 KO et des pous- 
sières et pour les fichiers ASCII à en- 
viron 40 KO. Autant dire que 99.99% 
des fichiers existant sur CPC seront 
transférables. 


2) bien attendre lors d’une écriture 
l'apparition du message de saisie 
d'un fichier à transférer avant de 
changer de disquette, même si l'on 
croit que c'est terminé. En effet, 
après la sauvegarde, le fichier est 
rapidement réouvert (sur le disc 
destination) pour en modifier l'en- 
tête et y Inscrire les valeurs originel- 
les (et non résultant de la sauvegar- 
de). Les spécialistes du langage 
machine trouveront plus de détails 
au dernier chapitre. 


Résumé des commandes 


- Touches curseur et TAB pour sélec- 
tionner les lecteurs et Users de sour- 
ce et destination et pour changer 
le sens de copie. 


- Touches du pavé numérique ou 
du clavier 1,4 et 2,5 pour faire les 
catalogue/directory des discs sour- 
ce et destination. 


- Touche DEL pour effacer un (ou 
des) fichler(s) sur le disc source dans 
une syntaxe similaire à celle de la 
commande RSX * | ERA”. 


- Touche ENTER où RETURN pour 
transférer un fichier. 


- Touche ESC pour interrompre les 
opérations de catalogue/directory, 
effaçage ou transfert avec retour 
au niveau précédent (au menu ou 


à la saisie de nom de fichier à trans- 
férer). 


PERSONNALISATION 
DE TRANSFIL 


Comme son prédecesseur FOR- 
MAT+, TRANSFIL a été conçu dans 
un souci de simplicité d'emploi et 
de modification. De même que 
pour FORMAT+, la personnalisation 
porte sur les formatages utilisés. 
Comme on va le voir l'adaptation 
est enfantine, pour peu que l'on sa- 
che ce qu'est un DPB. Mais encore 
une fols je renvoie pour cela à mon 
article sur l'exploitation de disquet- 
tes à formatage spécial. 


Les lignes de données de formata- 
ges. dans la version de TRANSFIL 
proposée, vont de 870 à 1090. Cha- 
que formatage est composé de trois 
lignes. Voyons-les par l'exemple : 


930 DATA «DATA+» 
940 DATA 0028,03,07,00.00D 1.003F.00C0,00 10,0000 
950 DATA C1.0A.18.24,5,02.04,00.00.FF 


Sur la 1ère ligne on trouve le nom 
du format. Sur la 2ème on trouve les 
9 premiers paramètres du DPB, ex- 
primés en héxadécimal sur un ou 
deux octets (paramètres SPT à OFF). 
Sur la 3ème ligne sont les paramè- 
tres FDC, de FSC au flag LOGIN. On 
a donc tout simplement le nom du 
formatage (entre guillemets pour 
éviter au BASIC des confusions) suivi 
du DPB exprimé en héxadécimal. 
Ce n'est que pour des raisons de 
facilité de lecture que l’on a mis 
cela en trois lignes et aussi séparé 
les fornatages les uns des autres. 


On n'a donc qu'à modifier ces Il- 
gnes selon ses besoins personnels. 
On peut mettre aussi le nombre de 
formatages que l'on désire, (en 
ajouter mails attention au remplissa- 
ge de l'écran, où en supprimer) : le 
programme s'occupe de tout le 
reste et gère toute la mise en page. 
Il ne faut pas oublier après le der- 
nier DPB le DATA FIN”. 


OCCUPATION 
DE LA MEMOIRE 

PAR TRANSFIL 

(partie binaire) 


Ce chapitre Intéressera surtout ceux 


connaissant le langage machine. 
Quant aux autres, Ils pourront amé- 
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llorer leurs connaissances de la RAM 
du CPC. 


Comme TRANSFIL travaille par char- 
gement de fichier entier en mémoi- 
re, un souci constant a été de réser- 
ver le maximum de mémoire (en 
continu) comme BUFFER 1/0. D'où 
l'utilisation de zones peu orthodo- 
xes pour caser des routines ou des 
données, comme le montre la pa- 
gination mémoire ci-après. En 
deuxième lieu, il me semble Intéres- 
sant d'expliquer comment Il est 
procédé au transfert de tous les fi- 
chlers, dans les limites du BUFFER, 
indépendamment de toute adres- 
se de chargement. 


1) Pagination sous TRANSFIL binaire 
* 0000 routine d'affichage d'un 
texte qui s'achève par 

un zéro 

type du fichier en transfert 
sauts standards en RAM 
ROM 


* 0030 TXT OUTPUT (copie du 
vecteur en BB5A) 


RAM standard 


* 0040 programme principal de 
gestion des commandes, de 


transfert e 

*O2FF d'effaçage avec les 
messages 

0300  BUFFER 1/0 

ABFB 


. ABFC 4 octets requis par 
l'AMSDOS 
. ABFF 


. ACOO début de la RAM du DOS 
(RAMDOS) 


* AD64 buffer pour les vecteurs 
cassette utilisé ici pour 
stocker les 

* AD8A LOC.LENEXEC, nom et sa 

longueur de fichiers + chiffres Hexa 


.BOFF fin de la RAMDOS 
.B100 RAM nécessaire au système 


d'exploitation 
. B8FF 


. B900 VECTEURS du système 
d'exploitation 


. BBB9 


* BBBA VECTEURS des packs 
GRASCR et CAS remplacés 
par routines de 

* BC67 saisie de nom.chargement, 
sauvegarde, vérification, 
arrêt. 


. BC68 VECTEURS du système 
d'exploitation 
. BD37 


* BD38 Vecteur JP RESTORE+vect. 
BASIC remplacés par 
routines de paramétrage, 

* BDCCgestion de fenêtres, 
activation de lecteur, DPB... 


. BDOD Indirections du système 
d'exploitation 
. BDFO 


* BDF1 adresses pour FAR CALL des 
RSXs de lecture/écriture de 

“ BDFF secteur recherche de piste, 
DIR et ERA 


* BEOO DPB n° 1 et DPB numéro 2 
* BE31 


* BE32 paramètres pour 
détermination des lecteur et 
user source et destination et 
pour le sens de copie 


* BE3F 


. BE40 RAM strictement réservée à 
l'AMSDOS (pas touche) 


. BE7F 


* BE80 texte du menu 
* BF41 


. BF42 
. BFFF 


RAM affectable par la pile 


. C000 RAM vidéo 
. FFFF 


Comme on peut le voir on s'est ser- 
vi de 2 Restarts : le numéro 0, qui ne 
sert qu'à remettre à zéro le CPC et 
le numéro 6 (RST 30H), qui n'est utili- 
sé qu'à l'initiallsation avant d'être 
inhibé. On peut donc les employer 
dans tout programme pour loger de 
très courtes routines ou des sauts à 
des routines. 


Dans la RAM réservée à l'AMSDOS, 
il y a un buffer de stockage des 
vecteurs cassette détournés par le 
DOS. Comme on n'aura pas besoin 
de ces vecteurs avec TRANSFIL, 


cette zone sert pour le stockage de 
données. 


Les vecteurs auxquels on peut tou- 
cher sans risque si on n'utilise pas le 
BASIC, sont justement ceux dédiés 
aux BASIC, de BD3A à BDCC. Com- 
me de plus ici Il n’est aucunement 
fait appel à des routines graphiques, 
tous les vecteurs du Pack graphi- 
que ont pu être recouverts par des 
routines. De même ceux du Pack 
“écran” (SCR), qui est certes utilisé 
par le Pack Texte, mais directement 
en ROM. Enfin les 6 premiers vec- 
teurs du Pack Cassette étant exclu- 
sivement destinés au travail sur cas- 
sette, on peut eux aussi utiliser leur 
place à loisir. 


En BDF1 on empiète sur un vecteur 
d'indirection lié à l'impression, qui 
n'est pas mise à profit dans TRANS- 
FIL. Donc aucun risque. A la suite la 
RAM libre jusqu'à BE3F est pleine- 
ment employée. 


Enfin l'occupation de la RAM par 
TRANSFIL s'achève par le texte du 
menu, logé en BE80 et s'étendant 
Jusqu'à environ BF40. Après il vaut 
mieux laisser trop de place à la pile 
du processeur que pas assez. 


2) Procédé de transfert 


Pour un fichier ASCII il n'y a pas 
d'en-tête et pas d'adresse de 
chargement donc, ce qui est assez 
logique. Les octets sont simplement 
lus Un par un et écrits Un par Un. 


Pour un fichier BASIC ou BINAIRE, on 
procède à la sauvegarde de son 
adresse de chargement, de sa lon- 
gueur et de son type après son 
ouverture et à la sauvegarde de son 
adresse d'exécution après son 
chargement. Cependant il est tou- 
jours chargé à une adresse cons- 
tante, 03004 dans la version présen- 
tée de TRANSFIL. Il est donc sauve- 
gardé avec cette adresse de char- 
gement, les autres valeurs étant el- 
les cependant égales aux origina- 
les. Le fichier est ensuite normale- 
ment fermé avant d'être aussitôt 
simplement ouvert. Cette ouverture 
permet en effet d'obtenir à l'adres- 
se RAMDOS+19H, soit ici AC19, le 
numéro du premier bloc du fichier 
sauvegardé, bloc qui débute par 
l'en-tête de fichier. Par calcul, en 
fonction du formatage employé, on 
détermine les pistes et secteurs cor- 
respondants. On lit ce secteur. On 
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remplace l'adresse de chargement 
0300H en position 15H par la vérita- 
ble que l'on avait stockée. Ensuite 
on calcule la nouvelle somme de 
contrôle ou CHECKSUM. Cette va- 
leur est la somme des 67 premiers 
octets du header et elle est écrite 
en position 67. Lorsque le DOS ouvre 
un fichier, il calcule ce CHECKSUM 
et vérifie si il est égal à ce qu'il y a 
en position 67. Si oui il s’agit d'un 
fichier à en-tête, sinon c'est inter- 
prété comme un fichier ASCII. Bref 
le nouveau CHECKSUM est calculé 
et sa valeur écrite là où il faut. Enfin 
le secteur ainsi modifié est écrit sur 
la disquette. Ceci explique pour les 
experts du suivi à l'œil des opéra- 
tions du lecteur de disquette qu'il 
se passe “quelque chose”” après la 
sauvegarde normale, ce “quelque 
chose” étant donc l'écriture de la 
vraie adresse de chargement du fi- 
chier. 


CONCLUSION 


Ce programme TRANSFIL et cet arti- 
cle conluent ma série d'articles et 
programmes sur l'utilisation de for- 
matages spéciaux de disquettes. 
Avec FORMAT+ je vous ai offert la 
possibité de formater selon votre 
fantaisie des disquettes (mais je me 
permets de préconiser le format 
DATA+). Grâce à TRANSFIL vous 
pouvez transférer d'une disquette à 
une autre, du moment que vous en 
connaissiez les formnatages, tous les 
fichiers de toutes sortes (ou au moins 
99.99%). Enfin avec l'ensemble de 
routines proposées dans mon pre- 
mier article maintes fois cité, vous 
pouvez adapter les programmes 
transférés pour qu'ils reconnaissent 
les formatages spéciaux où bien 
faire en sorte qu'ils les reconnais- 
sent sans modification, selon vos 
compétences en BASIC et langage 
machine. Ces articles et program- 
mes sont le fruit d'une très longue 
expérience dans ce domaine des 
formatages spéciaux de disquette 
sur CPC. J'ai ainsi pu utiliser pleine- 
ment les possibilités d'un lecteur B à 
80 pistes, avec autant de souplesse 
qu'un lecteur A. De surcroît je dis- 
pose de 792 KO par disquette (5'1/ 
4 à quelques francs l'unité). Je ne 
peux donc que souhaiter à tous 
autant de profit dans l’utilisation de 
leur système de disque sur CPC, qui 
est un des plus souples qui soient ou 
qui aient été, grâce à la compati- 
bilité CP/M. Vive l'AMSDOS | 


nt$(n))+2):READ a$:a=FN dec(a$):dpbn,1)=FN Isb(a) :dpb{ 


n,2)=F (a): j= ! ! ,d)= 
TRANSEIL - BAS En N asb(a):FOR j=3 TO 5:READ af$:dpbin, j)=FN dec(a$) 
| 299 FOR j=6 TO 14 STEP 2:READ a$:a=FN dec(a$) :dpb(n, j)= )ZV 
UAMELTELEETISLTEEITES TELE ESITEIELE) >RB FN Isb(a):dpbn, j+1)=FN msb(a):NEXT:FOR j=16 TO 25:READ 
118 *x  TRANSFEREUR de fichiers entre 1 )RC a$:dpb(n, j)=FN dec(a$):NEXT:n=n+1:READ fat$(n) :WEND:n= 
128 ‘+ entre tous formats pour CPC. x >RD | n-i 
138 ‘#4 copyright Yannick GOUR (c)1991 # RE | 39? RD 
UUAMTTETTETEPTESEEETEITELEEZTEELEETEELE >RF 318 ‘affichage du tableau des formats RE 
158 ? >RG | 328 h=14-n:g=1+(79-(n+1)#(1+1))/2:PAPER S:PEN 1:FOR i={ DUC 
168 ’ RH T0 n:a$=fat$(i)}:sp=(1-LEN(a$) )/2:nom$ (i)=SPACES(1-LEN( 
178 ‘auxx INITIALISATIONS 4444 )RJ a$)-sp)+fat$(i)#SPACES$(sp):LOCATE g+(1+1)#i,h:PRINT non 
189 ? >RK | $(i):LOCATE g,h+2#i:PRINT non$(i):NEXT 
198 CALL &BB89:SYMBOL AFTER 256:NEMORY 49988:LOAD"trans DNT | 338 1#=SPACES(1):FOR i=1 TO n:FOR j=1 TO n:LOCATE g+(1+ >KP 
fil.cod":DEFINT a-z:DIM fat# (28) ,non$(28),dpb(28,25):in D#i,h+24j:PRINT I$:NEXT j,i 
v$=CHR$(24):DEF FN dec(a$)=VAL("&*+a$):DEF FN asb(a)=IN 349 RH 
T(a/256) AND 255:DEF FN Isb(a)=a AND 255 358 ’init. de parass pour le tableau )RJ 
288 DRC | 368 k$="":ch$=CHR$(243)+CHR$(242)4CHR$(241)+CHR6(248)+C >DP 
218 ? DRD | HR#(13):x=#:y=8:LOCATE g,h+2:PRINT inv$;non$(1);invé:c= 
229 ‘xxx CREATION DE L'ECRAN ##34 DRE | 48:GDSUB 669 
2% >RF | 3# ? )TA 
248 ‘ecriture des textes >RG | 388 )TB 
258 c=#:GOSUB 669:BORDER 13:1INK 8,8:INK 1,26:MO0DE 2:MHI DFR | 398 ’4#ux CHOIX 4444 )TC 
LE wC)7:G0SUB 678:WEND:CALL &OF61:CLSH1:READ x,y,a$,a,b 499 RE 
:MHILE a$O"FIN":LOCATE x,y:PAPER a:PEN b:PRINT a$ :READ 419 MHILE k$OCHR$(13) :GOSUB 699 20 
x,y,a$,a,b:WEND 428 FOR i=1 TO 28:k$=INKEYS:NEXT:WHILE k$="":k$=INKEYS: 20 
268 ? DRJ | VEND:k=INSTR(ch$,k#):1F k=8 THEN 428 ELSE IF kOS5 THEN 
278 ‘lecture des formats >RK ! GOSUB 698:1F k:1 THEN x=(x+1) MOD n ELSE IF k:2 THEN x= 





289 n=1:READ fnt$(n):UHILE fmté(n)O©"FIN*":1=MAXCI,LENCf DCP | (xtn-1) MOD n ELSE IF k=3 THEN y=(y+1) MOD n ELSE y=(y+ 


CEE 





LA GESTION DE COMPTE BANCAIRE INDISPENSABLE POUR VOTRE CPC 


SELECTION MODIFIER RELEVES NILM 
SUPPORT/SORTIE CRITERE 


es caractéristiques 
- Gère jusqu'à 10 comptes (banque, épargne, caisse...). 
- Codes secrets possibles pour chacun des comptes. “il LIN] Mur 
- Saisie des opérations très simple, avec aide en ligne. + EC 
- Fonction archivage, vous permettant de stocker année par année ; É Gen 
vos opérations, 
- Fonction TRIER, pour obtenir des listes d'opérations par dates 
croissantes. 
- À l'aide de POINTER, vous pouvez effectuer la liaison avec votre 


DEBIT CREDIT SOLDE 





relevé de banque ‘officiel’. He OR EE CT RS PEU 
- Los — BON DE COMMANDE à retourner à 
- Recherche particulière répondant à 1 ou plusieurs critères: MICROLOGIC - B.P. 18 - 91211 DRAVEIL CEDEX 
parmi les suivants : -DATES DE DEBUT ET DE FIN :_ par téléphone:(1) 69.21.61.65 / par minitel (1) 69.24.49.08 
-MONTANTS MINIMUM ET MAXIMUM ; 
-UN LIBELLE PARTICULIER NÉ a ant FAO enr 
- Liste de chèques pouvant répondre aux critères suivants:  ! Adresse: ee 
-DATES DE DEBUT ET DE FIN : Code postal: Ville Sinon te nt sn ti ne ont 
-NUMEROS DE DEBUT ET DE FIN. De commande GESTION BANCAIRE 6128 , au prix 
- Relcvé complet -ENTRE DATES de 265,00 Frs. (port compris) 
-AFFICHAGE SOLDE REEL OÙ SOLDE De désire recevoir votre CATALOGUE GRATUIT 
OPERATIONS POINTEES. ‘ présentant votre autres produits pour CPC. 
- Sorties sur ECRAN , IMPRIMANTE ou DISQUETIE. i Je choisis de régler par :_ Expire 
© UTILITAIRES IMPRIMANTE, ECRAN, COPIE D'ECRAN...  [ CHEQUE CB. El re Me ol UE FIN. 


- UTILISE LES 128 Ko DE VOTRE CPC 6128. 0 MANDAT | ] CONTRE RBT (+35 Frs) 


n-1} MD n 


439 VEND )CF 
448 )RJ 
459 ? >RK 
468 ‘uxxx LANCEMENT DU TRANSFEREUR #44 )TA 
478 ? )TB 
488 ‘creation de l'ecran )TC 


498 c=#:G0SUB 669:CLS:FOR i=g TO 2:READ v,a$:LOCATE 1,v DUR 
:PRINT STRINGS (88, CHR$(297)) ; inv$:LOCATE 2,v:PRINT a$;i 
nv$:CALL LOFB4,8,8+B4LEN(a$), (25-v)x16, (26-v)#16-2:NEXT 


588 w=f:MHILE w<>7:GOSUB 678:CLS#u:WEND:PRINT" TRANSFIL )YB 
V1.8 (C) Y. GOUR 1991." :f$=STRINGS (3, CHR$ (154) ) +CHR&( 
243):a$="Transferts A(D):"+fat$(y+1)+" "+f$+" AD): 4f 
at$(x+1) :LOCATE B#-LEN(a$),1:PRINT a$ 

518 ? RG 
528 "ecrit parass pour bandeau sup. >RH 
538 a=&BE32:POKE a+9,#:POKE a+1,79-LEN(a$)+INSTR(a$, "A" )2J 
:POKE a+2,9:POKE a+3,PEEK(a+1)+11+LENCfmté(y+1)):POKE 
a+4,8:POKE a+5,PEEK(at1)+2:POKE a+6,8:POKE a+7,PEEK(at3 

+2 

549 POKE a+8,PEEK(a+3)-5:a6=CHR$(242)+f$:FOR i=1 TO LEN )BZ 
(a$):POKE a+8+i, ASC(NIDS(a$, i, 1)):NEXT 

559 ? )TA 
568 ‘ecrit DPBs )TB 
578 a=4BEB9:FOR if TO 24:POKE ati,dpb(y+1,i+1):POKE a+ >DH 
25+i,dpb(x+1, i+1) :NEXT 


588 ? TD 
598 ‘reloge texte du menu et lance transfereur )TE 
689 c=4#:GOSUB 668:CALL LOEBS:CALL &ADB )GU 
618 >RH 
629 ? RJ 
638 ’#wxx ROUTINES DIVERSES ###4 RK 
649 ? )TA 
658 ’c=f:ecran=bord; c=4@:ecran noraal )TB 
669 CALL &BD19:OUT &BC98, 1:OUT &BD#S, c:RETURN NL 


678 READ w,i,n,d,o,v,s:WINDOWEw, i,n,d,o:PAPERw, v:PENSu TL 
; 3:RETURN 

689 ’selection/deselection dans tableau TE 

698 LOCATE g+(x+1)#(1+1),h+(y+1)#2:PRINT inv$:1$:1F kÇ3 DAR 
THEN LOCATE g+l+x+i+u#l,h:PRINT non$(x+1) ELSE LOCATE 
gsh+24y+2:PRINT nom$ (y+1) 


789 RETURN )2C 
718 )RJ 
729 ? RK 
738 "###x DONNEES POUR L'ECRAN ###4 )TA 
749 ? )TB 
758 DATA 9,1,89,1,25,8,1 QT 
769 DATA 1,36,45,2,4,1,8 )QC 
778 DATA 6,2,49,25,25,3,1 RD 
789 DATA 7,1,1,1,24,8,9 )Pz 
798 )TG 
889 DATA 37,3, TRANSFIL, 1,9 WP 


818 DATA 19,6," Transfereur de fichiers entre tous form >DH 
ats ",8,1 

829 DATA 9,23," touches curseur pour la selection et EN )LE 
TER pour la validation ",8,1 

839 DATA 32,25," (C) Y. GOUR 1991 *,1,8 
849 DATA 9,8,FIN,8,9 


)EY 
)NB 





858 ? 

868 

879 ’axx# DONNEES DE FORMATS ###4 

888 

898 DATA "DATA" 

988 DATA 9924,93, 97,99, 59B3, 893F, 58C9, 0819, 9689 
919 DATA C1,89,24,52,E5, 82,84, 99,09,FF 

928 

938 DATA "DATA+" 

948 DATA 9928,93, 97,98, 89D1,893F, 88C8, 0819, 0880 
958 DATA C1,8A,18,24,E5, 82,84, 99,09,FF 

969 ’ 

978 DATA "DB1-198K" 

988 DATA 9928,93, 87,88,08C7,803F, 6C8,0019, 0988 
998 DATA C1,8A,18,24,E5, 82,94, 89,09,FF 

1888 

1918 DATA "DB2-198K* 

1929 DATA 9928,93,97,98, 9907, 003F, 80C9, 8819, 8528 
1838 DATA C1,9A,18,24,E5, 82,84, 08,98,FF 

1549 

1958 DATA “VENDOR" 

1968 DATA #824,93,97,98, O8AA, 093F, B0C9, 6819, 5582 
1978 DATA 41,99, 2A,52,E5, 92,94, 98,88,FF 

1889 

1999 DATA FIN 

1188 ? 

1119 

1128 *#x# ECRAN DU TRANSFEREUR #34 

1138 


1149 DATA 2,"Source",12," Destinat ion",22 


1158 DATA 


8,1,68,1,1,1,8 

1169 DATA 1,1,88,3,11,8,1 

1178 DATA 2,1,68,13,21,8,1 

1189 DATA 3,1,68,23,25,1,8 

1198 DATA 7,1,88,1,1,1,8 

1269 ? 

CHARGEUR - 
BAS 


LOU "ARRENDENARNAENANANERNARRANTE 
118 "# TRANSFIL: chargeur binaire # 
128 *# copyright Y. GOUR 1991 # 
FEU ET TE ETEZETETICEIEEI EDIT IE 
149 ? 


158 HENORY 49998 :OPENOUT"x":MEMORY HIMEM-1 :CLOSEOUT 


168 DEFINT a-z:d=&9E88:ad=d:1=21448 
178 FOR i=ÿ TO 213 
189 sun-8:parite=$ 


198 FOR j=9 TO 7:READ a$:a=VAL("&"+a$):POKE adtj,a 


288 sua=sunta:parite=paritet(a MOD 2)42*j 
219 NEXT 
229 READ at,b#:52=VAL("&"+a8) :p2=VAL("&"+b$) 


238 IF sua(s2 THEN PRINT'Erreur de data en ligne"; (1898+18xi): 


STOP 


249 IF parite<>p2 THEN PRINT" Interversion de datas en ligne"; (1 


998+18%i) :STOP 
259 ad=adt8 


22 


)TD 
)TE 
)TF 
TG 
DYA 
MB 
)DF 
)TB 
)DE 
MK 
)DG 
)TF 
HG 
HV 
)DL 
)D 
NF 
NJ 
)EE 
)XH 
DHX 
NJ 
)EN 
)YB 
XKB 
)XE 
XF 
»XG 
)XH 
)FJ 


)QD 
RE 
>RP 
RI 
)Q 
XF 


268 NEXT 

278 SAVE"transfil.cod",b,d, 1] 

288 END 

298 ? 

1898 DATA 21,60, 9E, 11,68, BE, 81, D8, 36B, 849 
1919 DATA #9,ED,B2,C9, 80, 1F,86, 91,298, AA 
1928 DATA F2, 94, 25, 34,6C,65,63, 74, 36E, 969 
1939 DATA 65, 75, 72,28, 73,6F, 75, 72,335,8#73 
1848 DATA 63,65, 1F, 1F,91,9A,F3, 28,284, 85F 
1958 DATA 3A,60,65,63, 74,65, 75, 72,32E,#6C 
1868 DATA 29,64,65, 73, 74,69,6E,61,388, BAC 
1979 DATA 74,69,6F,6E, 1F,3B,91,54,269,9#76 
1888 DATA 41,42, 29, 3A, 73,6F, 75, 72,2A6,871 
1998 DATA 63,65,F2,F3,64,65, 73, 74,45D,86B 
1198 DATA 2E, 1F,97,92,F8, 28, 3h, 75,215, 886 
1119 DATA 73,65, 72,28, 73,6F, 75, 72, 333,973 
1128 DATA 63,65, 1F,1F,92,F1,28,28,239, 92F 
1138 DATA 34,75, 73,65, 72,29,64,65,2E2,898E 
1148 DATA 73,74,69,6E, 61, 74,69,6F, 36B, 8DS 
1158 DATA 6E, 1F, 3B, 82, 44,45, 4C, 28, 1BF,926 
1169 DATA 34,65,66,66,61,63,65,1F,2B3, 8F2 
1179 DATA 83,93, 46,31, 2F, 46, 34,29, 146,81B 
1188 DATA 34,43, 41,54,2F, 44,49,52,228, 856 
1198 DATA 28,73,6F, 75, 72,63,65, 1F,2D8,#EE 
1298 DATA 1C, 93, 46,32, 2F, 46,35, 28, 161,852 
1219 DATA 3A,43,41,54, 2F,44,49,52,228,856 
1228 DATA 28,64,65, 73, 74,69,6E,61,388, BAC 
1238 DATA 74,69,6F,6E, 1F,3B, 83,52, 269,876 
1248 DATA 45,54,28,3A, 74,72,61,6E,2AB, 841 
1258 DATA 73,66,65, 72,65,89,89,89,215,815 
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1269 DATA 89, 99,09,08,09,00,90,98,080, 899 
1278 DATA 98,99,99,89,98,80, 06,99, 058,069 
1268 DATA 98,3E,4C,CD, 5A, BB, 21,88, 24D, 868 
1298 DATA C8,11,81,C8, 4D, 3E, 55,86, 278,956 
1399 DATA 98,77,ED,B8,97,47, 7C,B7,39D, 8B6 
1319 DATA 78,28,F4,C9,98,89,98,99,255,988 
1328 DATA 99,98,98,98,DD,ES,E1, 11,284, F8 
1338 DATA 7C,9F,81,86, 98, ED, BS, 2A, 2EB,926 
1348 DATA 7C,9F,CB,85,23, 23,22, BB, 36E, 8BE 
1359 DATA 9F,2A,62,9F,CB,85,22,C5,421,8B9 
1368 DATA 9F,2A,88,9F,CB, 65,23,23, 37E, 8F9 
1378 DATA 22,EB,9F,3E, #1, CD, DE, BB, 451,886 
1388 DATA 2A,7E,9F,CB, 65, 2B, 2B, AF, 390, BFC 
1398 DATA 23,23,81,88, 88,54, 5D, ED, 1E5,8C7 
1498 DATA 42,D9,62,6B, 11, 89,98, CB, 2BB, 898 
1419 DATA 4D,28,81,13,D5,1B, CD, F6, 33C,97D 
1428 DATA 9F,29, 12,13, CD, F6,9F, 28, 366, 859 
1438 DATA #C,13,CD,F6,9F,29, 86, E5, 38C, 896 
1448 DATA 1B, CD, EA,BB,E1, Di, 13, 13,465, 8FB 
1458 DATA D5,EB, 81,88, 89, AF, ED, 42, 39F,#67 
1468 DATA EB, D1,38,D8, 18, C2,ES5, D5,56#, 8C3 
1478 DATA CD,F8,BB,D1,E1,FE, 98, C9,5F1,89D 
1488 DATA F3,CD,37,BD, 21, 2D, A1, 11,384, 8FF 
1498 DATA 38,BD, 91,95, 89, ED, BS, 21,349, AE 
1598 DATA C2, A1, 11,BA, BB, #1,B1,98,39B, 876 
1519 DATA ED,B8, 21,73, 2,11, 48, 99, 324,92D 
1528 DATA 91,99,93,ED,B8, 21,9D, AB, 2FF, 86D 
1538 DATA 11,98,99,81, 87,99, ED, BS, 1B6,959 
1548 DATA 21,5A,BB, 11,38,98,91,93, 17B, BCD 
1558 DATA #8,ED,B9,21, A4, A9, C7, 21, SEA, SCA 
1568 DATA FF,B9,11,48,99,E,97,CD,2E2, 8C5 
1578 DATA CE, BC, 21,C9, A8, 11, F1, BD, 4D3,8EC 
1588 DATA 96,95,E5,C5,D5, CD, D4, BC, 4E7, BSE 
1598 DATA 38,31,D1,EB, 73,23, 72, 23,348,8BE 
1699 DATA 71,23,EB,C1,E1, 7E,23,FE, 4C9, 85F 
1619 DATA #8,29,FA,19,E5,21,66, AD, 343,989 
1628 DATA 22,64, AD,21,69, AD, 22,67, 2F3, 8BC 
1638 DATA AD,21,D7,A8, 11, 7B, AD, 81,37F,8F7 
1648 DATA 19, 89,ED,BS, 31, 89,C8,FB, 399, 994 
1659 DATA C3,22,81,CD, 38, BD, 21, E7, 3B8, SED 
1668 DATA A9,C7,CD,3F,BD, 21,98,98, 351, 83E 
1679 DATA $E,FD, CD, 16, BD, 7E,F7,23,443,9D6 
1688 DATA B7,29,FA,C9, 1F,#1,91,28,2DB, 879 
1699 DATA 54,52, 41,4E, 53,46, 49, 4C, 263,854 
1798 DATA 28,56, 31,2E, 39, 29,29, 28, 16D, 884 
1719 DATA 43,29,28,59, 2E, 29, 47,4F, 1C9,8CB 
1728 DATA 55,52,28,31,39, 39, 31, 2E, 109, 879 
1738 DATA 58,64,99,85,98,687,99, 44, 1D4,828 
1748 DATA 49,D2,88,45,52,C1,98, 38, 2A3, 829 
1758 DATA 31,32, 33,34, 35,36, 37,38, 144,955 
1769 DATA 39,41, 42,43, 44, 45, 46, SA, 1D8, 82B 
1778 DATA 28,28,28,29,28,28, 20,28, 199,888 
1788 DATA 28,28, 28,29,58,41,53,28, 184, 868 
1798 DATA 44,45,28,52, 4F, 40,28, 44, 1FB, #32 
1888 DATA 49,53,43,21,29, 28, 2D,52, 1BF, 84F 
1818 DATA 45,53,45,54,28, 4E, 45, 43,227,8C7 
1828 DATA 45,53,53,41,49,52, 45,2D,239, SDF 
1838 DATA 29,28,46,52, 41,59, 59, 45, 1FE, #98 
1848 DATA 52,29,55,4E,45,29,54, 4F,21D, 894 


23 











1859 DATA 55,43, 48,45, 66,86, 93, BE, 13C,94B 
1869 DATA 99,C3,B7,BB,C5, 86,64, CD, 431, 89E 
1879 DATA #9,BB, 18,FB,C1,C3,96, BB, 414,#BB 
1888 DATA AF,32,C9,BD,21,C5,BD, C7, 4D1, 8FD 
1898 DATA C9,21,32,BE, 18,83, 21, 36,24C,963 
1988 DATA BE, 4F, 46, 3A, 34, BE, E6, 88, 3EB, 892 
1918 DATA 87,9, 78,C8, 23, 23, 7E, C9, 38D, 883 
1928 DATA 57,CD,54,BD,5F, 32,98, AC, 372,81B 
1939 DATA C6,41, 32, 74,88, 7A, CD, 59, 34D,8C2 
1948 DATA BD, 32,91, AC, 42, 4B,21, 88, 244, 865 
1958 DATA BE, 34, 3A, BE, E6, 88, 97,B6, 415,948 
1968 DATA 28, 83,21, 19, BE, 11,98, AD, 271, 8AE 
1978 DATA AF,B9, 28,93, 11,D4, AD, 78, 399, 5B 
1988 DATA 81,19,99,ED,B8, C9, CD, 6B, 3BB, BEB 
1998 DATA BD,47,84,C5, CD, 34, BD, 21, 3B2, #DB 
2888 DATA 49,99,07,21,64,98,C7,C7,31A, BCC 
2818 DATA CD,3F,BD,FE,FC,C1,C8,E1,625,8A7 
2828 DATA 21,BE, 98,07, CD, 3A, BD, C3, 42D, 8D9 
2938 DATA 2C,91,1F,99,81,99, 88,89, 04D,916 
2848 DATA 99,85,21,69, AD, 96,99, CD, 28A, 89C 
2858 DATA 3F,BD,FE,FC, CB,FE, 8D, 29, 4E9,843 
2868 DATA 8A,AF,B8,28,F2, 76, 32,66, 39B, 892 
2976 DATA AD,37,C9,FE, 7F,28,8E, AF, 497,997 
2888 DATA B8, 28,E4,3E, 98, F7, SE, 18,34F, 928 
2899 DATA F7,2B,85, 16, DA, FE, 29, 38, 36F,987 
2195 DATA D6,FE, 5B, 38,94, D6, 29, 18,379, 894 
2119 DATA F4,77,3E,9C,B8, 28, C8, 7E, 3DB, #82 
2128 DATA 94,23,F7,18,C2,D5, 47, ÀF,3C3, BE6 
2138 DATA EB,ED, 52,3F,EB, 78, D1,C9,566, #DB 
2148 DATA 21,BE, 98,07, CD, 3F, BD, C3, 432, F9 
2158 DATA C3,91,21,69, AD, 34, 66, AD, 348, 89F 
2168 DATA 47,03, 77,BC,AF, CD, 6B, BD, 4E1,8F7 
2178 DATA 21,48,98,07,07,21,64,89,274,939 
2189 DATA C7,21,92,88,C7,C9,22,53,37F, 8B3 
2199 DATA BC,3E, 81,CD,6B, BD, 21, 49, 351,87C 
2295 DATA 89,07,21,57,98,07,07,C7,394,8EE 
2218 DATA CD,3F,BD,FE,FC, 28,84, E1,4C8,987 
2228 DATA C3,C3,91,21,D7,98,C7,21,367, SDF 
2239 DATA 69,AD, 11,98, 88, 34,66, AD, 274,987 
2248 DATA 47,CD,8C,BC,D8, Ei, C3, 98, 4E8, 863 
2258 DATA BC,98, 88,99, 98,99, 99,08, 9BC, 989 
2268 DATA 89,99,98,9C, 49,6E, 73,65, 19B, BDS 
2279 DATA 72,65,72,29, 44, 49,53, 43,28C,#E2 
2288 DATA 29,99, 73,6F, 75, 72,63,65, 2B1, BDC 
2298 DATA 28,98,64,65, 73, 74,69, 6E, 2A7,858 
2395 DATA 61,74,69,6F,6E, 29, 98,64, 29F, B8D 
2319 DATA 61,6E, 73,29,6C,65, 28,6C,2BF,#25 
2328 DATA 65,63, 74,65, 75, 72,28, 08,2A6, 81B 
2339 DATA 2C,28,78, 75,69, 73, 28,88, 22D,938 
2349 DATA 79,72,65,73, 73,65, 72, 28,324, 83C 
2358 DATA 75,6E,65,28, 74,6F, 75,63, 323,$E5 
2369 DATA 68,65, 3A,8A,98,65,6E, 74,258, 922 
2379 DATA 72,65,72,26,6C,65,28,6E, 2CB,822 
2388 DATA 6F,6D,29,64, 75, 28,66,69,2C4, 893 
2398 DATA 63,68,69,65, 72,89, 34, 28, 265, 88D 
2499 DATA 8A,9D,98,25,61,28,65,66, 183, 852 
2419 DATA 66,61,63,65, 72, 34, A, 8D, 252,88E 
2429 DATA 99, 8A, 9D,28, 29, 2A,28,41,8E2, 884 
2439 DATA 62,61,6E,64,6F,6E, 28, 2A, 2BC,912 


2448 DATA 99, 9A,9D,6C,69, 74,2E,2E, 1BC, 814 
2459 DATA 2E,98,8D,65,63, 72,69, 74, 252,#5C 
2468 DATA 2E,2E, 2E,88,89, 8A,9D,65, 186, 9C# 
2479 DATA 66,66,61,63,65, 2E, 2E, 2E, 27F,91C 
2489 DATA 68,FE, 31,29, 8D, AF, CD, A1, 379, 8F4 
2499 DATA BD,C5, 11,89, 83, CD, 9B, BC, 3BA, 977 
2589 DATA 18,15,FE, 32,28, 64, 3E, #1, 19, 882 
2519 DATA 18,EC,FE, 34,28, 8F, AF, CD, 3E1,8E8 
2529 DATA A1,BD,C5,AF,DF, FA, BD, C1,629, 8DF 
2538 DATA CD, 34, BD, 18, 12,FE, 35,28, 341,845 
2549 DATA 8E,3E, 91,18, EA, CD, 38, BD, 311, 8A4 
2558 DATA 21,88,BE,C7, CD, 38, BD, CD, 4B5, #D9 
2568 DATA 3F,BD,FE,F2,29, 16, AF, CD, 49€, 8C3 
2579 DATA 54,BD,EE, 81, 77,C6, 41, 32, 388,854 
2585 DATA C8, BD, 23, 7E, 32, C6, BD, CD, 448, 8C6 
2598 DATA 4B,BD,18,E3,FE,F3, 28, f4,418,#2B 
2689 DATA 3E,#1,18,E3,FE,F9,28, 14,35C, BA 
2619 DATA AF,CD, 59, BD, 3C,E6, 8F, 77, 43A,8CF 
2625 DATA 66,98, 4F,EB, 21, 7B, AD, 99, 292, 8FC 
2638 DATA 7E,EB, 18,D3,FE, F1, 28, 94, 467,92A 
2648 DATA 3E,91,18,E5,FE, #9, 28, 28, 283, 82A 
2658 DATA 21,34, BE, 7E, EE, 89, 77,47,3C3,K1 
2668 DATA E6, 7F, 32,C6, BD, 23, CB, 78, 488, 872 
2678 DATA 28,81,23,11,C8,BD, 81,94, 1DF,96E 
2688 DATA 99,ED, B9,CD, 4F, BD, 18,97, 425, BBA 
2698 DATA FE, 9D,28,27,FE, 7F,C2,EE, 487, 82A 
2789 DATA 88,CD, 38,BD, CD, 1C, BC, 21, 388, 89A 
2718 DATA BS,99,C7,CD, BA, BB, 38, 8D, 3F6, SAC 
2729 DATA 21,E2,99,C7,3E, #1, DD, 21, 397, 8E9 
2739 DATA 64,AD,DF,FD, BD, CD, 38, BD, 56C, #BE 
2748 DATA C3,22,91,CD, 38, BD, CD, 7D, 3F2, SED 
2758 DATA BC,CD,92,BC, CD, 1C, BC, C7, 543,892 
2768 DATA CD, BA, BB, 38,E8, 21,CE, 98, 449, 825 
2778 DATA C7,11,FB,A3, CD, 12,BC, 38,441,81F 
2789 DATA E5,FE, 94,38, 44,21,98,93,287,8A1 
2799 DATA 11,FB,A3,CD, 68, BC, 35, 88, 3F8,98F 
2899 DATA 77,23,CD, FD, BB, 38, F4, AF, 4FA, 89F 
2819 DATA FE, 1A,C2,88, BC, 28, 22, 75, 368, 8A8 
282 DATA AD, CD, 7A,BC, D2, #8, BC, 21, 467, 883 
2639 DATA FB,A3,CD,2E, BC, 21,98, 93,379, 8A7 
2849 DATA ED, 5B, 75, AD, 7E, CD, 95, BC, 586, 86F 
2859 DATA D2,88, BC, 23, CD, FD, BB, 38, 476,878 
2868 DATA F3,CD,8F,BC, D2, #8, BC, 18,489, 897 
267$ DATA 9D,ED, 53, 75, AD, ED, 43, 77,4A6,9FF 
2888 DATA AD,32,97,98,21,68,93, 99,113, 8D5 
2698 DATA 2B,11,FB, AB, CD, FD, BB, D2, 539,97F 
2998 DATA C3,91,21, 65,93, CD, 83, BC, 2F4, 877 
2919 DATA D2,98,BC, 22, 79, AD, CD, 7A, 425,878 
2928 DATA EC, D2,88,BC, 21, 88,83, CD, 343, 8D8 
2939 DATA 2E,BC, 21,98, 93, ED, 5B, 77, 2CD,#F4 
2948 DATA AD, ED, 4B, 79, AD, 34, 87,98, 34C, 85F 
2958 DATA CD,98,BC,D2, 88, BC, CD, 8F,513,8#C1 
2968 DATA BC,D2,98,BC, 11, 88,93, CD, 333, 8D8 
2978 DATA 12,BC, D2, 88, BC, DD, 21,99, 3F2,868 
2969 DATA AD, 34,98, AC, FE, 58, 28,94, 2BD, 891 
2998 DATA DD,21,D8, AD, 3A, 19, AC, 47, 3C1,8AB 
3898 DATA DD, 7E,93,3C, 16,98,5F, 21, 238, 8C5 
3919 DATA 98,98, 19,18, FD, 23, DD, 7E, 2A4,#74 
3828 DATA 89,5F,AF,ED, 52, 3C, 38, FB, 384, 88E 


3838 DATA 19,3D,57,DD, 7E, 8D,82,57,2EE,8AF 
3849 DATA 34,88, AC,5F, DD, 7E, 15, 4F, 384, 8D8 
3959 DATA 7D,24,91,38, FC, 25, DD, 7E, 3DE, 865 
3868 DATA 8F,84,4F,21,99,93,DD,E5, 2C8, SED 
3879 DATA C5,D5,E5,DF, F1, BD, 2A, 75, 5AB, 8BF 
3888 DATA AD, 22, 15,93, 21, 98,98, D1, 1D9, 89D 
3998 DATA D5,96,43,C5, 14,86, 88, 4F, 252, 8BD 
3198 DATA 99,13,C1,18,F6, 22, 43,93, 248, 8C7 
3119 DATA E1,D1,C1,D5, DF,F4, BD, D1, 6A9, 9DF 
3128 DATA DD,E1,DD, 7E, 8D,57,DF,F7,553,8F7 
3138 DATA BD,C3,C3,81,88,98,88,09,244,95F 
3149 DATA 89,99,09,99,99,99,88,08,989,989 


LISTINSS 
ASSEMBLEUR 
BOOT 


ORG 9F61H 
LOAD 9F61H 


ÉPFFETE TEE ESTEZSSETIESIIEITIEII IEEE 
; 2 routines pour assister le BASIC 


remplissage d'ecran avec ASCII 297 


sefface l'ecran 
LD A,8CH 
CALL 9BB5AH 
;injecte les parametres 
LD HL, 8C#88H 
LD DE, #C891H 
LD C,L 
LD 4,55H 
LD B,#8 
LD (HL),A 
LDIR 
ÿdecale motif et continue 
RLCA 
LD B,A 
LD A,H 
DR A 
LD A,B 
JR NZ,FILL 


FILL: 


;sans effacer le texte 
TAMPON:DEFS 88 
sreloge X1,X2,Y1,Y2 dans un buffer 
PUSH IX 
POP HL 
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LD DE, TAMPON 

LD BC, ##88 

LDIR 
corrige valeurs de fin pour tests 
set les insere dans le programme 

LD HL, (TAMPON) 

RES 8,L 

INC HL 

INC HL 

LD (Y2+1),HL 

LD HL, (TANPON+S#6) 

RES #,L 

LD (X1+1),HL 

LD HL, (TAMPON+84) 

RES $,L 

INC HL 

INC HL 

LD (X2+1),HL 


sset encre de prensier plan 
LD 4,81 
CALL SBBDEH 
jinitialise Y (pair) a Yi 
LD HL, (TAMPON+#2) 
RES 8,L 
DEC HL 
DEC HL 
sefface le carry pour la Îere boucle 
XOR À 


init. 
LOOPY: 


pour boucle sur les Y 
INC HL 
INC HL 
Y2: LD BC, #989 

LD D,H 

LD E,L 

SBC HL,BC 
ifini si Ÿ depasse YŸ2 
RET NC 
LD H,D 
LD L,E 


idecale 11 de 1 si no de ligne/2 inpair 


X1: LD DE,9888 
BIT 1,L 
JR Z, LOOPI 


INC DE 


commence le test sur le point a gauche 


LOOPX: PUSH DE 
DEC DE 


itest du pt et des 2 pts adjacents 
CALL TESTPT 
JR NZ, NEXTPT 
INC DE 
CALL TESTPT 
JR NZ,NEXTPT 
INC DE 


CALL TESTPT 
JR NZ, NEXTPT 


33 pts vides: on alluse celui du silieu 
PUSH HL 
DEC DE 
CALL SBBEAH 
POP HL 


on passe au 2e point a droite 
NEXTPT:POP DE 

INC DE 

INC DE 


ipreserve nlle abscisse pour test 
PUSH DE 
EX DE,HL 
X2: LD BC,9888 
XOR À 
SBC HL, BC 
srestaure X et Ÿ 
EX DE,HL 
POP DE 


3si Carry on continue sur la ligne 
JR C,LOOPX 

Sinon on passe au dessus 
JR LOOPY 


’ 
iteste si valeur de point=$ 


TESTPT:PUSH HL 
PUSH DE 
CALL 6BBFPH 
POP DE 
POP HL 

iteste si point eteint 
CP #8 
RET 


HI EEE TETE EEE ETES TETE 
11 x 
3# TRANSFIL V1.# - transfert 3 
ÿ# entre tous forsats L 
3# copyright Y. GOUR (c)1991 
Œ % 
PL CPP STE EF E 


adresses de donnees 


TYPE:  EQU 88974 
RANDOS: EQU SACS#H 
PTRVAR: EQU SAD64H 
DESCRI: EQU SADG6H 


BUFFER: EQU SAD69H 
LOC:  EQU SAD75H 
LEN: EQU SAD77H 











EIEC: EQU #AD79H 
HEXA:  EQU SAD7BH 
EQU SBDF1H 
EQU #BDF4H 
SEEK: EQU SBDF7H 
DIR:  EQU SBDFAH 
ERA:  EQU SBDFDH 
EQU 9BES#H 
DPB2: EQU SBE19H 
BANSUP: EQU 8BE32H 
TIMENU: EQU #BEBSH 


sadresses de routines 


MENU: EQU #122H 
TOUCHE: EQU 812CH 
TRANSF: EQU #1C3H 


svaleurs et touches 
LOMEM: EQU 9388H 
EQU SABFBH 


LENPK1: EQU #895H 
LENPK2: EQU 88B1H 


EQU #DH 
ESC:  EQU 8FCH 
DEL:  EQU #7FH 


DECTFFEZEEI ETES EEE LEE ETS 
; INSTALLATION DU PROGRAMME & CO 


DI 
sreinitialise vecteurs 
CALL #BD37H 


;reloge packs de routines 
LD HL, PACK 
LD DE, SWAP#3 
LD BC,LENPKI 
LDIR 
LD HL, PACK2 
LD DE, INPUT 
LD BC, LENPK2 
LDIR 

sreloge programme 
LD HL, PGH 
LD DE, 89484 
LD BC, 83884 
LDIR 


jinstalle routine d'affichage en RST## 
LD HL, AFF 
LD DE, #88 
LD BC,9897 
LDIR 


;TXT OUTPUT en RST38 
LD HL, SBB5AH 
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LD DE, 89384 
LD BC, #883H 
LDIR 


copyright dans bandeau 
LD HL, COPYR 
RST #9 


sinstalle DOS 
LD HL, SBSFFH 
LD DE, #848H 
LD C,87 
CALL SBCCEH 


trouve RSX 4,5,7,DIR et ERA 
LD HL,RSIDOS 
LD DE, RDSEC 
LD B,#5 
FNDRSX: PUSH HL 
PUSH BC 
PUSH DE 
scherche RSI 
CALL SBCD4H 
stop si introuvable 
JR NC, STOP 
recupere adr. buffer 
POP DE 
echange avec adr. RSI 
EX DE,HL 
sstocke adr. RSI dans buffer 
LD CHL),E 
INC HL 
LD CHL),D 
INC HL 
LD (HL),C 
INC HL 
reset a jour adr. buffer 
EX DE,HL 
ÿrestaure compteur et ptr RSX 
POP BC 
POP HL 
snlle RSX suit un zero (cf table) 
INCHL: LD A, CHL) 
INC HL 
CP #9 
JR NZ, INCHL 
DJNZ FNDRSI 


iptr et descripteur de VAR pour ERA 
LD HL, DESCRI 
LD (PTRVAR),HL 
LD HL, BUFFER 
LD (DESCRI+1),HL 


loge chiffres en HEXA 
LD HL,NBHEXA 
LD DE, HEXA 
LD BC, #418H 
LDIR 


LD SP,8C888H 
El 
JP MENU 


STOP: CALL SWAP93 
LD HL, TXSTOP 
STOP2: RST #8 
CALL WETKEY 
LD HL, 85894 
LD C,9FDH 
CALL SBD16H 


routine d'affichage de texte 
AFF: LD A, CHL) 

RST 39H 

INC HL 

OR A 

JR NZ, AFF 

RET 


ssessage de copyright 

COPYR: DEFB 1FH,81,91,' TRANSFIL 
DEFB 'V1.9 (C) Y. GOUR’ 
DEFB ’ 1991.’,88 


:RSXs du DOS 
RSXDOS:DEFB #4+88H,88 
DEFB 85+68H, 98 
DEFB 97+68H,88 
DEFB 'DI','R'+68H,58 
DEFB ’ER','A'+88H,88 


schiffres HEXA pour les Users 
NBHEXA:DEFB ‘#1234567B9ABCDEF" 


spas de ROM DISC!!! 

TXSTOP:DEFB BAH, | 
DEFB ?PAS DE RON DISC!” 
DEFB " -RESET NECESSAIRE-’ 
DEFB *  FRAPPER UNE TOUCHE’ 
DEFB 8$ 


; PACK de routines N01 


ORG SBD3BH 
LOAD PACK1 


Pnnmmmmmmmmmmmmmmmmmmmmm 


’ 
echange fenetres # et 3 
SMAPS3:LD B,83 





echange fenetres # et B 
SWAPNI :LD C,98 
JP SBBB7H 


, 
sattend touche 
WETKEY :PUSH BC 
LD B,64H 
ATTEND:CALL SBB#9H 
DJNZ ATTEND 
POP BC 
JP SBBS#6H 


’ 
saffiche nouveau Lecteur/User 
AFFLU: XOR À 
LD (LECUSR+4), A 
3 AFFLU2 
LD HL, LECUSR 
RST #8 
RET 


lecture du DRIVE 
GETLEC:LD HL, BANSUP 
JR GETLU 


slecture du user 
GETUSR:LD HL, BANSUP+4 


Punmmmmmmmmmmmmmmmmmmmmmmmmmm 


! 
ssub pour lire source ou dest. 


spreserve source/dest. dans C 
GETLU: LD C,A 
slit valeur ’i' 
LD B, (HL) 
determine sens 
LD A, (BANSUP+8) 
AND 88H 
RLCA 
CPC 
LD A,B 
ÿretour pour valeur '{’ 
RET Z 
lit valeur '2' 
INC HL 
INC HL 


» 
sinstalle Lecteur et User 


spreserve Source/Dest. dans D 
SETLU: LD D, A 
sinstalle lecteur 

CALL GETLEC 
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; preserve DRIVE dans E 
LD E,A 
LD (RAMDOS), A 
ADD A, 41H 
LD (AOUB), A 
sinstalle user 
LD A,D 
CALL GETUSR 
LD (RAMDOS+1),A 
spreserve source/dest et lecteur 
LD B,D 
LD C,E 
sdeteraine DPB correspondant #/1 
LD HL, DPB{ 
LD À, (BANSUP+6) 
AND 68H 
RLCA 
CPB 
JR Z, SETLU2 
ÿsens # et dest ou sens 1 et source 
LD HL,DPB2 
:detersine adresse du DPB selon A/B 
SETLU2:LD DE, RANDOS+9198H 
XOR À 
CPC 
JR 2,SETLU3 
spointe sur DPB B 
LD DE, RAXDOS+#1D8H 
srestaure source/dest 
SETLU3:LD A,B 
srecopie DPB 8/1 sur DPB A/B 
LD BC, ##19H 
LDIR 
RET 


, 
prepare lect/usr pour CAT/DIR 
CATDIR:CALL SETLU 
echange fenetres # et source/dest. 
LD B,A 
INC B 
PUSH BC 
CALL SWAPYI 
saffiche message 
LD HL, INSERE 
RST 88 
LD HL, LECTEU 
RST 88 
RST 99 
sattend touche ou ESC 
CALL VETKEY 
CP ESC 
POP BC 
sretour si pas de BREAK 
RET NZ 
sdepile adresse de retour inutile 
POP HL 
ssessage d'abandon 
LD HL, MESESC 


RST 98 
srestaure les fenetres 

CALL SWAPVI 

JP TOUCHE 


, 
buffer txt pour bande sup 


LECUSR:DEFB 1FH,99,91,99,89,99,68,88 


1SS2222S22S2ZESSSSES2SSSSSSST ESS 


; PACK de routines N02 


ORG SBBBAH 
LOAD PACK2 


’ 
;INPUT pour chargt ou effact 


jinit. pour buffer 
INPUT: LD HL,BUFFER 
LD B,88 
ssaisie de caracteres, ENTER, DEL, ESC 
INPUTI:CALL WETKEY 


CP ESC 
{si ESC stopper tout. ESC->N0 CARRY 
RET Z 


CP ENTER 
JR NZ, INPUT2 
ENTER licite (nom donne)? 
XOR A 
CPB 
JR 2, INPUT! 
set a jour la longueur de var. 
LD A,B 
LD (DESCRI),A 
lancer le chargement. RET-)>CARRY 
SCF 
RET 


INPUT2:CP DEL 
JR NZ, INPUT3 
DEL licite (+1 car)? 
XOR A 
CPB 
JR Z, INPUT 
effacer dernier caratere 
LD A,88}H 
RST 35H 
LD A, 18H 
RST 38H 
sreset a jour le buffer 
DEC HL 
DEC B 
JR INPUT 


saccepter car. dans lisite 29-5A 
INPUT3:CP 28H 





JR C, INPUTI 
CP 5BH 

JR C, INPUT4 
SUB 25H 

JR INPUT3 


istocker car. Pas le 13e? 
INPUT4:LD (HL),A 
LD A,8CH 
CPB 
JR 7, INPUT 
aise a jour buffer et affichage 
LD A, CHL) 
INCB 
INC HL 


’ 
ÿVERIFL:verifie si HL<=DE 


spreserve regs DE et À 
YERIFL:PUSH DE 
LD B.A 
itest 
XOR À 
EX DE,HL 
SBC HL,DE 
C=0K - NC=on stoppe: HL)DE 
CCF 
restaure registres 
EX DE,HL 
LD A,B 


Qummmmmmmmmmmmmmmmmmmmmmmmmmm—m— 


’ 
:STOPI0:abandon pour LOAD/SAVE 
STOPI0:LD HL,MESESC 

RST 88 

CALL WETKEY 

JP TRANSF 


’ 
;0PENIN:ouverture de fichier 
OPENIN:LD HL,BUFFER 
LD A, (DESCRI) 
LD B,A 
disk open in 
JP 8BC77H 


! 
;3SETIN:prepare pour charge/efface 


sset lecteur et user source 
SETIN: XOR À 

CALL SETLU 
ssessage de procedure 

LD HL, INSERE 
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RST 88 
RST 65 
LD HL, LECTEU 
RST 88 
LD HL,NOMFIC 
RST 99 


;SETOUT:prepare pour sauvegarde 


met lecteur et user dest. 
SETOUT:LD (BUFF10+1),HL 
LD 4,81 
CALL SETLU 
ssessage pour DISC destination 
LD HL, INSERE 
RST 98 
LD HL, DESTIN 
RST 98 
RST 8# 
RST 98 
sattend touche 
CALL VETKEY 
CP ESC 
JR NZ, SETOU2 
sabandon (depile adr. de retour) 
POP HL 
JP TRANSF 


ÿsessage d’ecriture 
SETOU2:LD HL, ECRIT 

RST 88 
souvre fichier en sortie 

LD HL, BUFFER 
BUFFI0:LD DE, 8988 

LD A, (DESCRI) 

LD B,A 

CALL #BC8CH 

RET C 


;abandon (depile adr. de retour) 
POP HL 
JP STOPI0 


PECITETEEETEIT EEE 
,;TIT en bas de RAM 


ORG ##48H 
LOAD ##48H 


INSERE:DEFB 12,’ Inserer DISC ’,98 
SOURCE :DEFB ‘source ',#8 
DESTIN:DEFB destination ? ,#8 
LECTEU:DEFB ‘dans le lecteur ’, 
AOUB: DEFB 88,', puis ,8# 


PRESSE:DEFB ‘presser une touche:',18,98 
NONFIC:DEFB ‘entrer le nom du fichier’,88# 


DEFB ': ",18,13,88 


EFFACE:DEFB ’ a effacer:’,18,13,8 
HESESC:DEFB 19,13,' * Abandon +°,9$ 
LIT: DEFB 18,13,’1it...”,88 

ECRIT: DEFB 13,'ecrit...',88,98 
EFFFIC:DEFB 18,13,'efface...’ ,88 


END = 


TX MENU 


HECPTFETEFFEFEITTEETTESCELE 
4 TETE MENU pour TRANSFIL * 
5# copyright Y. GOUR 1991 3 
ÉECTELTEEETEFPECTEESTESTELET 


ORG 9EBSH 
LOAD SEBBH 


TXNENU: EQU SBE88H 


LD HL, TEXTE 
LD DE, TXMENU 
LD BC, 8584 
LDIR 


RET 


TEXTE:DEFB 12 

DEFB 31,6,1,8F2H,9AH," :lecteur source" 

DEFB 31,31, 1,9AH, 8F3H," :lecteur destination" 
DEFB 31,59,1,"TAB :source", 8F2H, 8F3H, "dest." 
DEFB 31,7,2,8F8H," :user source" 

DEFB 31,31,2,8F1H," :user destination" 

DEFB 31,59,2, "DEL :efface" 

DEFB 31,3,3,"F1/F4 :CAT/DIR source" 

DEFB 31,28,3,"F2/F5 :CAT/DIR destination" 
DEFB 31,59,3,"RET :transfere" 


END es 


VRANSEIL 


HŒPFFPEPFEZFESTES CESSE LEE 
14 3 
54 TRANSFIL V1.8 - transfert x 
;* entre tous formats 3 
3* copyright Y. GOUR (c)1991 # 
14 4 
ŒEFPCFPFTESEETFESFETESTESTETES 


sadresses de donnees 


TYPE:  EQU 99874 
RANDOS: EQU SACS#H 





NOBLOC: EQU RAHDOS+9819H 
DPBA:  EQU RANDOS+#199H 


SPT:  EQU 88H 
BLN: EQU 93H 
OFF:  EQU SDH 
FSC:  EQU 8FH 
RPS: EQU 15H 


PTRVAR: EQU SAD64H 
: EQU SAD66H 
BUFFER: EQU BAD6OH 
LOC: EQU S#AD75H 
LEN: EQU SAD77H 
EXEC: EQU SAD7OH 
HEXA:  EQU SAD7BH 
: EQU SBDCSH 

EQU SBDF1H 

EQU #BDF4H 
SEEK:  EQU SBDF7H 
DIR: EQU SBDFAH 
ERA: EQU SBDFDH 
DPBi:  EQU SBESZH 
DPB2: EQU 8BE19H 
BANSUP: EQU SBE32H 
TXNENU: EQU 8BE88H 


sadresses de routines 


INPUT: EQU SBBBAH 
VERIFL: EQU #BBFDH 
STOP10: EQU SBCS8H 
DPENIN: EQU #BC12H 
SETIN: EQU 8BCICH 
SETOUT: EQU #BC2EH 


SWAPS3: EQU SBD38H 
SVAPUI : EQU SBD3AH 
VETKEY: EQU 8BD3FH 
AFFLU: EQU #BD4BH 
AFFLU2: EQU 8BD4FH 
GETLEC: EQU SBD54H 
GETUSR: EQU SBD59H 
SETLU: EQU SBD6BH 
CATDIR: EQU SBDA1H 


{valeurs et touches 


EQU 8398H 
EQU SABFBH 
EQU #FS#H 
BAS: EQU #F1H 
GAUCHE: EQU 8F2H 
DROITE: EQU #F3H 
TAB:  EQU 89H 

:  EQU 92H 
ESC: EQU 8FCH 
DEL: EQU S#7FH 
F1: EQU 31H 


28 





F2: EQU 32H 
F4: EQU 34H 
F5: EQU 35H 


HLPEFTPET TETE TETE 
; TRANSFEREUR 


ORG ##48H 
LOAD 8#48H 


INSERE:DEFB 12," Inserer DISC ’,8# 

SOURCE: DEFB ‘source ‘,88 

DESTIN:DEFB ‘destination ? ,8# 

LECTEU:DEFB ‘dans le lecteur , 

AOUB: DEFB #9,', puis ’,8# 

PRESSE :DEFB "presser une touche:',18,898 

NOMFIC:DEFB ‘entrer le nom du fichier" ,8# 
DEFB ': ,18,13,88 

EFFACE:DEFB ? a effacer:°,18,13,8 

MESESC:DEFB 18,13," x* Abandon +#°,8# 

LIT:  DEFB 19,13,’1it...’,88 

ECRIT: DEFB 13,'ecrit...’,88,88 

EFFFIC:DEFB 19,13,’efface..." ,98 


MENU7: CP Fi 
JR NZ, NENUG 

;catalogue source 
XOR À 

LBL4: CALL CATDIR 
PUSH BC 
LD DE, LONEM 
CALL #BC9BH 
JR LBL6 


MENUS: CP F2 
JR NZ, HENU9 
;catalogue dest. 
LD 4,81 
JR LBL4 


MENU9: CP F4 
JR NZ, NENUA 
sdirectory source 
XOR À 
LBL5: CALL CATDIR 
PUSH BC 
XOR A 
RST 16H 
DEFY DIR 
LBL6: POP BC 
CALL SWAPVI 
JR TOUCHE 


MENUA: CP F5 
JR NZ, TOUCHE 
“directory destination 
LD A,#1 
JR LBLS 


saffiche le Menu en fenetre 3 
MENU: CALL SWAP93 

LD HL, TXMENU 

RST #$ 

CALL SWAPS3 
attend frappe de touche 
TOUCHE :CALL WETKEY 


CP GAUCHE 

JR NZ, MENU? 
change lecteur source 

XOR À 
ssaisit lecteur 
LBLI: CALL GETLEC 
;comute lecteur 

XOR #1 

LD (HL),A 
secrit lettre A/B 

ADD A, 41H 
LBL7: LD (LECUSR+3),A 
ecrit position de lettre 

INC HL 

LD A, (HL) 

LD (LECUSR+1),A 
ÿremet a jour affichage 
CALL AFFLU 
JR TOUCHE 


MENU2: CP DROITE 
JR NZ, NENU3 
schange lecteur dest. 
LD 4,81 
JR LBL1 


HENU3: CP HAUT 
JR NZ, NENU4 
;change user source 
XOR À 
ssaisit user 
LBL2: CALL GETUSR 
sincresente user 
INC A 
AND #FH 
LD CHL),À 
prepare index BC pour affichage 
LD B,## 
LD C,A 
EX DE,HL 
pointe caractere pour User 
LD HL,HEXA 
ADD HL, BC 
LD A, (HL) 
restaure HL pour position de User 
EX DE,HL 
JR LBL7 


MENU4: CP BAS 
JR NZ, MENUS 








;change user dest. 
LD 4,81 
JR LBL?2 


MENUS: CP TAB 
JR NZ, NENUG 
change sens de copie 
LD HL, BANSUP+8 
LD A, CHL) 
XOR 884 
LD (HL),A 
LD B,A 
ecrit position pour affichage 
AND 7FH 
LD (LECUSR+1), A 
INC HL 
sdetersine sens de la fleche 
BIT 7,B 
JR NZ, LBL3 
INC HL 
ÿrecopie fleche pour affichage 
LBL3: LD DE, LECUSR+3 
LD BC, ##84 
LDIR 


MENUG: CP ENTER 


affiche sessage 
DELETE:CALL SVAPS3 
CALL SETIN 
LD HL,EFFACE 
RST #8 
ssaisit nos de fichier 
CALL INPUT 
JR NC, FINCOP 


ynessage d’effacage 
LD HL,EFFFIC 
RST #4 
sefface fichier 
LD A,81 
LD IX,PTRVAR 
RST 18H 
DEFV ERA 


FINCOP:CALL SWAP#3 
JP MENU 


; TRANSFERT DE FICHIER 
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’ 
ferme par defaut tout fichier ouvert 


TRANS#:CALL SVAPS3 
TRANSF:CALL #BC7DH 
CALL SBC92H 
affiche sessage 
CALL SETIN 
RST #8 
ssaisit non de fichier 
CALL INPUT 
JR NC, FINCOP 


’ 
souvre fichier 


ssessage de lecture 
LD HL,LIT 
RST #8 
LD DE,HIHEN-2948 
CALL OPENIN 
;si NC, laisse beton pour ce fichier 
JR NC, TRANSF 


ibifurque selon type de fichier 
CP #4 
JR C,BASBIN 


ph : 
ifichier ASCII 
sit tous les octets 
LD HL, LONEN 
LD DE,HIMEN-2848 
ASCI12:CALL 8BC8#H 
JR NC,ASCI13 
LD (HL),A 
INC HL 
verifie si fichier pas trop long 
CALL VERIFL 
JR C,ASCI12 
strop long:abandon 
XOR À 


ASCI13:CP 1AH 

serreur isprevue: stop! 
JP NZ, STOPI0 

stocke adr. du dernier octet 
DEC HL 
LD (LOC) ,HL 


ferme le fichier 
CALL 8BC7AH 
JP NC,STOPI0 


sauvegarde fichier 


LD HL,HIMEN-2548 


CALL SETOUT 


envoie les octets un par un 
LD HL, LOMEN 
LD DE, (LOC) 
ASCI14:LD A, (HL) 
CALL 9BC95H 
JP NC,STOPI0 
INC HL 
CALL VERIFL 
JR C,ASCI T4 


sferse le fichier 
CALL SBCBFH 
JP NC, STOP10 
JR TRANSF 


PARTS SAS SSSR eesreserrss 1 
ÿStocke LOC/LEN/TYPE pour BAS/BIN 
BASBIN:LD (LOC) ,DE 

LD (LEN),BC 

LD (TYPE), A 


fichier BASIC/BINAIRE pas trop long? 
LD HL, LOMEN 
ADD HL,BC 
DEC HL 
LD DE,HIMEM 
CALL VERIFL 
JP NC, TRANSF 


, 
charge fichier 


LD HL, LONEM 

CALL #BCB3H 
sabandon si M 

JP NC, STOPI0 
sstocke adresse d'EXEC 

LD (EXEC),HL 

CALL #BC7AH 
sabandon si NC 

JP NC, STOPI0 


;sauvegarde fichier 


LD HL, LOHEM 
CALL SETOUT 
LD HL, LOMEM 
LD DE, (LEN) 
LD BC, (EXEC) 
LD A, (TYPE) 
CALL #BC9BH 
JP NC,STOPI0 


iferse le fichier 
CALL #9BC8FH 











JP NC, STOPI0 


;correction du header de fichier 


ouvre fichier pour lire 1er bloc 
LD DE, LOHEM 
CALL OPENIN 
JP NC, STOPI0 


scalcule adr. DBP (IX) selon lecteur 
;IX=adr. DPB A par defaut 

LD IX,DBPA 

LD A, (RAHDOS) 

CP #8 

JR Z,DDAS 
sIX=adr. DPB B 

LD 1X,DPBA+8848H 


sreleve no de bloc 
DDAS: LD A, (NOBLOC) 
LD B,A 
inb de records (128 octets) par bloc 
LD A, (IX+BLM) 
INC À 
LD D,$ 
LD E,A 
snb records de 128 octets <=) NOBLOC 
LD HL, 8889 
ADD HL, DE 
DJNZ DDAI 
;{er record du bloc recherche 
INC HL 


DDA1 : 


lit nb de records par piste 
LD A, (IX+SPT) 
LD E,A 
XOR A 
;compte nb de pistes ->NOBLOC 
DDA2: SBC HL,DE 
INC A 
JR NC, DDA2 
srajoute DE pour calcul de no de secteur 
ADD HL,DE 


sstocke piste 
DEC À 
LD D,A 
sajoute decalage de piste 
LD A, (IX+0FF) 
ADD A,D 
LD D,A 
lecture du Drive 
LD A, (RAMDOS) 
LD E,A 


snb de records par secteur 
LD A, (IX#RPS) 
LD C,A 
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‘recupere reste de piste dans A 
LD A,L 
icalcule no logique de secteur (H) 
DDA3: INC H 
SUB C 
JR NC,DDA3 
sajuste H 
DEC H 
{lit no physique du {er secteur 
LD A, (IX+FSC) 
iStocke no de secteur du bloc vise 
ADD A,H 
LD C,A 


;lit secteur du HEADER de fichier 
LD HL, LOHEM 
PUSH IX 
PUSH BC 
PUSH DE 
PUSH HL 
RST 16H 
DEFW RDSEC 


secrit vraie adr. de loc. 
LD HL, (LOC) 
LD (LOMEN+15H),HL 
scalcule la CHECKSUM 
LD HL, 9898 
POP DE 
PUSH DE 
LD B,43H 
PUSH BC 
LD A, (DE) 
LD B,88 
LD C,A 
ADD HL,BC 
INC DE 
POP BC 
DJNZ DDA4 
secrit la CHECKSUM 
LD (LOMEH+43H) ,HL 


DDA4: 


secrit secteur HEADER sodifie 
POP HL 
POP DE 
POP BC 
PUSH DE 
RST 18H 
DEFY WRSEC 
retour en premiere piste 
POP DE 
POP IX 
LD A, (IX+0FF) 
LD D,A 
RST 18H 
DEFW SEEK 
JP TRANSF 


END 


BON DE GOMMANDE 


Pour chaque article, entourez le ou les n° choisis. 
ANCIENS Nos AMSTAR & CPC 
N°26-27-28-29-3%0-31-32-33-34 

35— 36 —38 — 39 — 40 — 41 - 42-43-44 45-46-47 


DISQUETTES AMSTAR & CPC 
N°20-21—22-23- 24-25-76 — 27 — 28-29 — 30 
(une disquette réunit 2 numéros consécutifs d'Amstar & CPC) 


ANCIEN No CPC Infos 
N°25-26-27-28-29-30-31-32-33-34-35 


Abonné 
Non abonné 


DISQUETTES CPC Infos 

— MEGA SOUND 

—AXYS 

— N° 31 (AnvStar 48 & CPC Infos 24) — N° 32 (CPC Infos 25 & 26) — N° 33 (CPC Infos 27 & 28) 


— N° 34 (CPC Infos 29 & 30) — N° 35 (CPC Infos 31 & 32) — N° 36 (CPC Infos 33 & 34) — N° 37 (CPC Infos 35 & 36) 


ANCIENS Nos CPC 
N° 11-13-16-18-23-24-25-26 
27-28-29-30-31-32-33- 34-36-37 


ANCIENS Nos HORS-SERIE CPC 
N°7-8-9-—10- 12-13-14-15-16 
N°17-18-19-20-21-22-723 


DISQUETTES CPC ET DISQUETTES HORS-SERIE CPC 
N°1-2-3-4-5-6-7-8-9-10-11-12-13-14-15-16-17-18-19 
(une disquette réunit 2 numéros consécutifs de CPC) 

HS1 — HS2 — HS3 — HS4 — HS5 — HS6 — HS7 — HSB — HS9 — HS10 — HS11 
HS12—HS13—HS14—HS15 —HS16—HS17 — HS18— HS19 — HS20 — HS21 -- HS22 -- HS23 


ABONNEMENT 6 DISQUETTES (non rétroactif) 


DISQUETTES “ ARCADES”’ Téléchargement AMSTRAD CPC 
CABLE pour téléchargement 
[Téléchargement non compatible avec 6128+ et 464+) 


Forfait port + 10 F par logiciel et 10 % pour livres 


A expédier à : Editions SORACOM 
La Haie de Pan - 35170 BRUZ 


25 F [unité] 
26 F [unité] 


110 F {unité) 
140 F {unité] 


26 F [unité] 


Abonné : 
110 F {unité) 
Non abonné : 
140 F {unité) 


25 F {unité 


21 F {unité) 
23 F [unité] 


Abonné : 
110 F {unité) 
Non abonné : 
140 F (unité) 


600 F 


60F 
89F 


Franco 
Franco 


Franco 
Franco 


Franco 


Franco 


Franco 


Franco 
Franco 


Franco 


Franco 
Franco 


5F 
5F 


prendre contact avec le service commercial MONTANT GLOBAL 


Je joins mon règlement : 


PAYEZ PAR CARTE BANCAIRE 


Date d'expiration 


[inscrire les numéros de la carte, la date et signer] 


Q chèque bancaire 


Signature 


Date et signature Signature 


Q chèque postal 


Code Postal : 


Q mandat 


Ville : 
ECRIRE EN MAJUSCULES 


CPC Infos 36 


Afin de faciliter le traitement des commandes, nous remercions notre aimable clien- 
tle de ne pas agrafer les chèques, et de ne rien inscrire au dos. 





Commande : La commande doit comporter tous les renseignements demandés sur le bon de commande (désignation ou référence si celle-ci existe). Toute absence de précisions est sous la responsablité de l'acheteur. La vente est 


condus dès acceptation du bon de commande par notre société, sur les articles disponibles uniquement. 


Les prix : Les prix indiqués sont valables du jour de la parution du catalogue jusqu'au mois suivant ou au jour de parution du nouveau catalogue, sauf erreur dans le libellé de nos tarifs au moment de la fabrication du catalogue, et de 


variation de prix importante des fournisseurs. 


Livraison : La liaison intervient après le règlement Les délais de Evraison étant de 10 à 15 jours environ, SORACOM ne pourra ôtre tenue pour responsable des retards dus aux ransporteurs ou aux grèves des services postaux. 
Transport : La marchandise voyage aux risques et péris du destinataire. La Hvraison se faisant par cols postal ou par transporteur. Les prix indiqués sur le bon de commande sont valables sur toute la France métropolitaine, + 20 F par 
article pour Outre-Mer par avion et au-dessus de 5 kg nous nous réservons la possibilité d'ajuster le prix de transport enfonction du coût réel de celui-ci. Pour bénéficier de recours possible nous invitons notre aimable clientèle à opter pour 


l'envoi en recommandé. À récepon des paquets, loute détérioration doit être signalée 


Réciamation : Toute réclamation doit intervenir dans les dix jours suivants la réception des marchandises. 








CHRONIQUE DU 
TELECHARGEMENT 


Comme vous avez pu 
le constater, il n’y a pas 
eu de rubrique 
téléchargement dans le 
numéro précédent. 
C’est pourquoi nous 
allons revoir ce mois-ci 
les titres de fichiers 
déjà installés. 


ais d'abord pour bien dé- 
M buter, il me semble néces- 

saire de faire un petit retour 
en arrière afin de préciser certaines 
choses concernant les types de fi- 
chiers présents sur le 36-15 Arcades. 
Il y a eu en effet ces derniers temps 
des difficultés pour charger certains 
programmes. 


LES DIFFERENTS 
TYPES DE FICHIERS 


Commencons par les plus simples : 
les fichiers qui ne possèdent pas 
d'extension, c'est-à-dire qui se ter- 
minent par trois espaces (Ex : PO- 
KER. ). Ces fichiers sont, en géné- 
ral, des programmes BASIC qui se 
trouvent sous forme ASCII. ls se 
chargent normalement et s'exécu- 
tent directement. Mais il est préfé- 
rable et parfois même indispensa- 
ble de «transformerm ces program- 
mes en BASIC. En effet, vous avez 
du remarquer que ces fichiers sont 
lents à charger sous leur forme AS- 
Cl. Pour les sauver sous forme BASIC, 
il suffit de les charger avec LOAD 
«Nom du fichier», puis les sauver 
simplement avec SAVE «Nom du fi- 
chier. Les programmes ainsi sauvés 
possèderont une extension .BAS. 


Ensulte, vous trouverez les fichiers 
possèdant une extension .MDM. Il 


s'agit ici de fichiers binaires sauve- 
gardés sous un format spécial. Ils ne 
peuvent être exécutés directement 
. ils doivent être transformés avec le 
programme ASBI (rubrique utilitaires) 
où TRANSFER (dans le programme 
Arcades dernière version). Pour 
cela, il suffit de lancer le program- 
me de transformation , d'entrer le 
nom du fichier .MDM et de sauve- 
garder le fichier ainsi obtenu. Atten- 
tion, il est conseillé d'utiliser une face 
de disquette par programmes trai- 
tés, parce que les noms des fichiers 
.MDM sont souvent différents de 
ceux des programmes résultants. 


Enfin dernière extension apparue sur 
le serveur : les fichiers se terminant 
par ."Z" (les «"» remplacent n'impor- 
te quelle lettre où chiffre). Ces pro- 
grammes ne peuvent être exécutés 
directement car ils ont été com- 
pactés. L'intérêt du compactage 
est de réduire la taille du fichier et 
donc de réduire ainsi le temps de 
téléchargement. L'inconvénient est 
la nécessité de décompacter les fi- 
chiers avant de pouvoir les lancer. 
La première chose à faire est de 
télécharger le programme 
CRUNCH20 (rubrique utilitaires) qui 
comprend à la fois le compacteur 
et le décompacteur. Laissons de 
coté les opérations de compacta- 
ge, pour se concentrer sur le dé- 
compactage. 

Première opération : charger le CP/ 
M grâce à la disquette système (elle 
est livrée avec le CPC lors de 
l'achat). Il suffit d'introduire la dis- 
quette et de taper ICPM. La suite 
dépend du nombre de lecteurs que 
vous possédez : avec 2 drives : pas 
de problèmes. Avec un seul drive 
c'est un peu plus compliqué. 


Pour les heureux possesseurs d'un 
deuxième lecteur, il suffit de copier 
sur la disquette contenant les pro- 
grammes téléchargés, le fichier 
UNCR20.COM. Pour lancer le dé- 
compactage il suffit d'introduire la 
disquette préparée dans le lecteur 
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A et une disquette vierge dans le 
lecteur B puis de taper : UNCR20 *.* 
B:. Vous observerez alors le décom- 
pactage successif de tous les fi- 
chiers contenant une extension .777? 
(" et ? étant des «jokers», relisez vos 
manuels). 

Si vous ne possédez qu'un seul dhri- 
ve, accrochez-vous à vos claviers | 

En effet, il y a deux solutions possi- 
bles : soit vous utilisez la même mé- 
thode que précédemment en 
échangeant les disquettes à cha- 
que fois (très très long) où bien vous 
copiez une partie (la moitié par 
exemple) des fichiers compactés 
plus le programme UNCR20.COM sur 
une disquette, vous lancez le dé- 
compactage avec UNCR20 *.* /Q 
et puis vous effacez les fichiers .777? 
Il ne reste qu'à mettre le reste des 
fichiers compactés et recommen- 
cer les mêmes opérations. Cette 
dernière méthode demande plus 
d'organisaiion que la première mais 
elle est moins «stressante». 


I y a encore un cas qui complique 
l'affaire : vous ne possédez que le 
CP/M 2.2 (cas du 464 et du 664). 
Dans ce cas, il faudra formater une 
disquette en «système», en utilisant 
la fonction Format S du CP/M par 
exemple et y copier tous les fichiers 
à traiter. Avec 2 lecteurs, il n'y a 
pas de gros problèmes puisque la 
procédure est la même que pour le 
CP/M+. Avec un seul lecteur, on ne 
peut utiliser qu'une des méthodes 
décrites car le lecteur A ne peut 
changer de fonction et devenir un 
«lecteur B». N'oubliez pas que les 
disquettes formatées en système ne 
peuvent être que des disquettes de 
transition : vous devrez transférer vos 
programmes sur disquette au format 
DATA car certains fichiers occupent 
178. Ko c'est-à-dire la capacité 
maximale (169 Ko seulement pour 
les disquettes systèmes). 


Bien sûr ce système est un peu 
compliqué mais il ne faut pas per- 
dre de vue que les fichiers com- 





pactés occupent moins de place 
et diminuent d'autant le coût du 
téléchargement. 


LES CATALOGUES 


Du coté des catalogues on peut 
noter un changement : l'emploi du 
pluriel n'est pas un fait du hasard. 
En effet, le catalogue unique a été 
scindé en plusieurs parties recour- 
vrant les différents thèmes du télé- 
chargement. Cela permettra de ne 
télécharger que les rubriques qui 
vous intéressent. 

Autre petit changement, le fichier 
CATA contient cette fois-ci un petit 
programme BASIC autorisant la sor- 
tie sur écran ou sur Imprimante d'un 
fichier ASCII où bien un catalogue. 

N'oubliez pas que le télécharge- 
ment des catalogues est trés forte- 
ment conseillé car il permet d'avoir 
sous les yeux tous les noms de fi- 
chier et surtout les tailles en octets 
de chacun d'entre eux. 


LES NOUVEAUX 
PROGRAMMES 


Deux nouvelles rubriques font leur 
apparition : DEMONSTRATIONS et 





ADULTES. 

Pour la première, il s'agit de regrou- 
per ces programmes un peu spé- 
ciaux de manière à ce que les 
amateurs puissent s'y retrouver. Ce 
mois-ci vous trouverez : la demo du 
fanzine 3 pouces Mag, la 68000 Killer 
demo, AVSATB démo ll l'intro de 
CBS, la CCO demo Il, la First Second 
démo de GMC, la démo Monsters 
of Darkness et enfin un demo-ma- 
ker, c'est-à-dire Un programme 
permettant de réaliser ses propres 
démos. Mais il ne faut pas réver, 
vous ne pourrez produire que des 
écrans fixes avec un scrolling et une 
musique sous interruptions. 


Je vous rappelle que vous pouvez 
vous procurez des démos auprès de 
nombreux fanzines (voir les adresses 
dans la rubrique Fanz'infos). 

Pour la rubrique Adultes, il n'y a pour 
l'instant qu'un seul programme mais 
cela changera bientôt (dès ce 
mois-ci). N'oubliez pas de décom- 
pacter ces fichiers avant utilisation 
(CRUNCH20, voir plus haut). 


N'oubliez pas également que le 
contenu de cette rubrique est des- 
tiné aux personnes de plus de 18 
ans. Vous voilà donc prévenu. 

Dans une autre rubrique, DIVERS 


avec le kit ARCADES. 





ARCADES 


Des centaines de logiciels pour CPC à télécharger 


pour ne pas la nommer, vous trou- 
verez le programme GERBERT 
d'écriture arabe. Il s'agit ici de la 
première version publiée. Vous 
pourrez télécharger la suivante dès 
le mois de Septembre. 

Enfin pour en terminer avec les nour- 
veaux programmes, vous trouverez 
une série de jeux inédits (car an- 
glais) en BASIC (avec parfois un 
soupçon d'Assembleur). En voici les 
titres afin que vous les repériez plus 
facilement : 

Centipod, Diamdig, Eggstat, Rolla- 
bal, Snappers et Wheeload. 


AU-REVOIR 


Voilà encore un nouveau mois, 
avec de nombreuses nouveautés et 
cela ne va pas s'arrêter en si bon 
chemin puisque vous trouverez 
courant Septembre de nombreux 
autres logiciels dont de nombreuses 
images numérisées et des démos en 
pagaille. 

Le 36-15 Arcades comptait plus de 
500 titres au dernier recensement, 
vous avez donc un choix important, 
accessible pour 0,98 franc la minu- 
te. 


Bon téléchargement. 








Voir bon de commande page 31 4 












On vous a toujours dit 
que vous aviez une tête 
de cochon! C’est le 
moment d’en tirer parti 
dans ce jeu alliant 
rapidité et réflexion. 


\/ oicli les différents programmes 
à taper et la procédure de 
chargement: 


- le programme CHARGE.REC 
met en place sur la disquette le fi- 
chier RECORD. Une fois lancé, 
CHARGE.REC peut être effacé. 


- le programme CHARGET.BAS 
met en place le fichier binaire 
CODE.SCR. Une fois lancé, 
CHARGET.BAS peut être effacé. 


Enfin,  ACTREF.BAS et 
ACTREF.JEU sont les programmes 
principaux. 


Pour visiter tous les niveaux, il suf- 
fit de remplacer dans le program- 
me ACTREF.JEU à la ligne 3930 le 
RESTORE 4110 par RESTORE ( 4110 + 
(niveau -1) x 110) 


Par exemple, si l'on veut voir le 
niveau 4, il suffit de mettre « RESTO- 
RE 4110 + (4-1) x 110 - 4440 « 


Les règles sont incluses dans le 
jeu (il faut attendre lors de l'intro- 
duction) et celui-ci comporte 18 ni- 
veaux. 


A la ligne 3930, on peut aussi 


modifier le nombre de bombes 
(BOMBE) et le nombre de vie (VIE). 


BONNE CHANCE 
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NU 
CHARGE -REC 

19 DIM nomrec$(25),score$(25),score(25) >HK 
28 OPENOUT"record" RE 
38 FOR i=1 TO {2 >VG 
4ÿ nonrec$(i)="manu":score$(i)="ÿ592":score(i)=S88:NRIT BE 
E49,score(i),nonrec$(i),score$(i) 

5ÿ NEXT )YF 
68 FOR i=13 TO 25 )CK 
78 nonrec$(i)="gigi":score$(i)="#259":score(i)=259:WRIT >BU 
E#9,score(il,nomrec$(i),scoref$(i) 

84 NEXT )Y] 
9ÿ CLOSEOUT )LA 
CHARGE] - BAS 
19 MEMORY &9123:ad-89124 >TA 
28 FOR i=9 TO 3789 )LG 
38 READ a$:POKE adti, VAL("&"+a$) YF 
4ÿ NEXT )YE 
59 SAVE"code.scr",b,49124,379ÿ )AF 


1909 DATA 98,09,49,C9,CF, 82,09, 09,00,09,00,09,00,09, 33,33 
1918 DATA 33,33,99,00,90,00,00,00,080,09,C5,CB,99,09,00,90 
1928 DATA 89,CF,99,09,49,C9,CF,CF, 87, 0A, 00,09, 00,00,99,09 
1939 DATA 33,33, 33, 76, 76,33,90,00,08,00,90,99,C9,CF,C3,C3 
1949 DATA 90,99,00,45,09,080,899,C80,C9,CF,CF,CB,87,09,00,00 
1954 DATA 99,09, 11,33,33,33,B9,B9,B9, 22,99,88,989,09,49,C5 
1968 DATA CB,C3,C3, 82,90, 09,45,90,06,49,C9,C5,CF,CF,CF,CB 
197 DATA 9A,09,09, 00,08, 33,33, 33,76, 76,FC, 76,33, 00,00, 00 
1989 DATA 98,C5,CF,C3,C3,C3,C3,99,09,09,CF,99, C,C9,C5, CF 
1998 DATA CF,CF,CF,6F,99, 00,90, 90,33,03,33,B9,FC, FC, B9, B9 
1199 DATA 90,08,00,09,C5,CB,C3,87,0F,C3,09,09, 00,00, 00,C9 
1119 DATA C9,CF,CF,CF,CF,CF,87,08,09,00,11,23,13,33,76,FC 
1129 DATA FC,FC,33,22,99,99,89,C5,CB,C3,C3,87, 4B,99, 00,00 
1139 DATA 82,99,C9,C5,CF,CF,CF,CF,CF,87,99,09, 90, 33,03, 33 
1149 DATA 76,76,FC,FC, DC, FC, 33,89,90,99,C5,C3,C3,C3,87, 8D 
1154 DATA 99,89,41,41,99,C9,CF,CF,CF,CF,CF,CF,87,89,00,00 
1169 DATA 33,93,33,B9,FC,FC,EC, CC, B9, 33, 99,99, 99,C5,C3,C3 
1174 DATA 99,87,8D,99,99,41,41,90,C5,CF,CF,CF,CF,CF,CF,87 
1189 DATA 99,99,11,23,13,33,76,FC,;FC,EC,CC,FC, B9, 22,99,98 


1199 DATA C5,C3,9A,09,C3, 4B,99,98,98,82,98,C5,CF,CB,C3,CF 
1294 DATA CF,CF,87,09,99,11,23,13,33,B9,FC,FC, EC, CC, DC, 33 


1219 DATA 22,04,99,C5,C3, 82,08, 41,62, 09,00,09,90,89,C5,CF 
1224 DATA C7,CF,C7,CF,CF,687,09,99,33,03, 33,33, 76,FC,FC,EC 
1239 DATA CC, DC, FC, 33,99,99,C5,C3,9A, 08,00, 00,00,00,05,9A 
1249 DATA 99,C5,CB,C7,82,45,CF,CF, 87,99, 09,33, 03,33, 33,B9 
1259 DATA FC,FC,EC, CC, DC, B9, B9,99,69,C5,C3, 8A, 89, 09,00,88 
1269 DATA 98,95,05,09,C5,CB,C7,40,09,CF,CF,87,08,11,293,13 
1279 DATA 33,33, 76,FC,FC,EC, CC, DC, FC, 33,22,09,C5,C3, SA, 99 
1289 DATA 09,90,96,99,95,9A,09,C5,CB,67,09,99,C5,CF,87,90 
1299 DATA 11,23,13,33,33,B9,FC,FC,FC, CC, DC, B9,B9, 22, 99, C5 
1390 DATA C3,62,90, 09,00, 09,09,05,00,99,C5,CB,C7,99,99,C5 
1319 DATA CF,87,99,11,93, 13,33,33,76,FC,FC,FC,CC, DC, FC, 33 
1328 DATA 22,89,C5,C3,9A, 09, 00,09, 00,09, 00,09, 09,C5,CB, 4B 
1339 DATA 49,09,C5,CF,87,09,33,93,33,33,33,B9,FC, FC, FC, EC 


XD 
>XQ 
x 
VX 
YC 
)YB 
>AZ 
)YQ 
>AQ 
)AD 
DYC 
>AY 
)ZA 
> AB 
DAV 
> AF 





1349 DATA FC, B9,B9, 33,08, C5, C3, 04, 00,09,09,00, 00,44, 44,09 
1359 DATA C5, CB, 4B, 99,08, C5, CF, 87,08, 33,03, 33, 33, 33, 76, 76 
1369 DATA FC, FC, FC, FC, FC, 33, 33,99, C5,C3, 84,09, 00,06,00,00 
1379 DATA 44,44,99,C5,CB, 4B, 08, 98,C5, CB, 87,98, 23,03, 33,33 
1389 DATA 33,B9,FC, FC, FC, FC, FC, B9, B0, 33, 99, C5, C3, A, 00, 08 
1399 DATA 99,09,90,09,88,00,C5,CB,4B,90,08,C5,CB, OF, 09, 23 
1499 DATA 93,33,33, 33,76, 76,FC, FC, FC, FC, FC, 33, 33,06, C5, C3 
1419 DATA 84, 09,09,00,98,00,08,88,08,C5,CB, 4B, 90, 20, C5, CB 
1429 DATA 9F,90,33, 13,33, 33, 33,33, B9, FC, FC, FC, FC, B9, B9, 33 
1439 DATA 89,C5,C3,0A,99,00,99,00,08,00,99,00,C5,CB, C3, 89 
1449 DATA 99,C5,8F, 8D, 11,33, 33, 33,67, CF, 33,33, FC, FC, FC, FC 
1459 DATA B9, 33, 13, 22,C5,C3, 98, 00,08, 00,00,00,54, AB,60,C5 
1468 DATA CB,C3,99,09,C5,6F, 8D, 11,33, 33, 33,67, CF,93, 76, 76 
1479 DATA FC, FC, FC, 33, 23, 13,22, C5,C3, A, 08, 41,82, 90,09,54 
1489 DATA 54,09,C5,CB,C3,00,08,C5,87,8D, 11,33, 33, 33,67,CF 
1499 DATA 43,33,B9, FC, FC, B9,B9, 93,93, 22,C5,C3, 84, 90,95, FA 
1599 DATA 99,00,54,A8,00,C5,CB, 4B,09,90,C5,87,0F, 11,23, 33 
1519 DATA 33,67, CF, 03, 33, 76, 76, FC, 76, 23,93, 23,22, C5, C3, 87 
1528 DATA 99,87,9F,09,99,54,54, 00,05, CB, 4B, 09, 09, C5,87,0F 
1539 DATA 11,23,13,33,67,CF,93, 33,33, B9,B9, 89, 23, 13, 23, 22 
1549 DATA C5,87,C3,0F,0F, 6D, 00,00, 09,00, 99, C5, CB, 4B, 00, 4ÿ 
1558 DATA CF, 87, 8D, 11, 23,93, 33,67,CF, 03, 33, 33, 76, 23,13, 23 
1569 DATA 13,93,22,C5,C3,C3, C3, 0F, 8D, 99, 09, 09, A2,09,C5, CR 
1578 DATA 4B,09,49,CF,87,8D, 11, 23,03, 13,67, CF, 93, 33, 33, 33 
1589 DATA 93,13,23, 03,93, 22,C5,87,C3,09,0F, 0F, 00,00, 00, A2 
1599 DATA 99,C5,CB,4B,08,C5,CF,87,8D, 11,23,03,83,67,CF,43 
1649 DATA 13,23,93, 03,13, 23,93, 03, 22, C5, C3, 82, 09,05, 04,00 
1619 DATA 99,06, A2,08,C5, CB, 4B,00,C5,C5,87, 8D, 11, 23, 13,83 
1629 DATA 67,CF,93,13, 23,03, 03, 13, 33,03, 13, 22, C5, 87,82, 90 
1639 DATA 05, 0A, 09,00,00, A2,99,C5,CB, 4B, 49,CB,C5,87,8D, 11 
1649 DATA 23,13,23,67,CF,03, 13, 33, 03,03, 03, 33,03, 33, 22, C5 
1659 DATA C3, 62, 90,00,09,00,08,00,08,D0,C5,CB, 4B, 49, CB, CS 
1669 DATA 87,8D,45,CF,CF,CF,67,CF,CF,9B, CF, CF, CF, 93,67, CF 
1679 DATA CF,BA,C5,87,82, 00,00, 00,08,09,00,3C,89,C5, CB, dB 
1689 DATA C5,82,C5,87,8D,45,CF,CF,CF,67,CF,CF,9B, CF,CF,CF 
1699 DATA 93,67,CF,CF,8A,C5,87,82,08,00,00,09,00, 14,00, 09 
1788 DATA C5,CB,4B,C5,82,C5,87, 8D,45,CF,CF, CF, 67,CF,CF,9B 
1719 DATA CF,CF,CF,03,67,CF,CF, BACS, 87, 82, 00,06, 00, 00, 00 
1729 DATA 14,14,98,C5,CB, 4B,CB, 89, C5, 87, 8D, 45, CF, CF,CF,67 
1739 DATA CF,CF,9B,CF,CF,CF,13,67,CF,CF,8A, C5, 87, 82, 89, 80 
1748 DATA 90,09,00, 09, 3C,09,C5, CB, 4B, CB, 80, C5, 87, 8D, 45, CF 
1759 DATA CF,CF,67,CF,CF,9B,CF,CF, CF, 33,67, CF,CF, GA, C5, 87 
1769 DATA 82,09,00,00, 00,09, 00,00, 00, C5, CB, 4B, 82,09, C5, 87 
1778 DATA 8D,45,CF,13,33,67,CF, 13,33, CF,8B,47,33,67,CF,43 
1780 DATA 8A,C5,87,82, 80,09, 00, 00,00,59,50,09,C5, CB, 4B, 82 
1792 DATA 99,05,87,8D,45,CF, 13, 33,67, CF, 13,33, CF, 88, 47, 33 
1899 DATA 67,CF, 33, 8A,C5, 87, 82, 90, 09,09, 00,09, 50,50, 09, C5 
1819 DATA C3,48,09,09,C5,87,8D,45,CF, 13,33,67,CF, 13, 33, CF 
1829 DATA 9B,CF,13,67,CF,CF,8A, C5, 87,82, 09,09, 09,00, 00,50 
1839 DATA F9,00,C5,C3,4B, 08,98, C5,87, 8D,45,CF, 13, 33,67, CF 
1849 DATA 13,33,CF,CF,CF, 13,67, CF,CF, BA, C5, 87, 82,09, 09,09 
1854 DATA 09,00,50,58,09,C5,C3, 48,08, 00,C5,87, 8D,45,CF, 13 
1869 DATA 33,67,CF, 13,33, CF,CF,43,93,67, CF, CF, 8A, C5, 87, 82 
1879 DATA 09,09,00,09,09,00,08,00,CF,87, 48,00, 89, CF, BF, ED 
1889 DATA 45,CF,93,33,67,CF, 13, 33,CF, CF, 23,43, 67, CF, 33, 22 
1804 DATA C5,87,82,04,00,00,08,00,55,FF,08,CB, 87, 4B, 09, 00 
1999 DATA CF,9F,8D,45,CF,43,93,67,CF, 13,33, CF, CF, 9B, 93,67 
1919 DATA CF, 33, 22,5, 87, 82,09, 00,08, 00,98,00, AA, 0, CB, 87 
1929 DATA 4B,09,99,CF,9F,8D,45,CF,03,93,67, CF, 13, 33,CF, CF 
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1939 DATA 9B,13,67,CF,33,22,C1,87,82,09,00,90,89,00, 89, AA 
1949 DATA 90,CB,87,4B,60,00,6F,8F,8D,45,CF,23,93,67,CF,93 
1958 DATA 33,CF,CF,CF,33,67,CF,33,98,C1,87,82,89,00,89,09 
1969 DATA 49,99, AA,90,CB,67,4B, 09,99, 6F, 4E, D, 45,CF, 33,33 
1978 DATA 67,CF,93,13,CF,9B,CF,33,67,CF,33,98,C1,87, 82,99 
1988 DATA 09,00,00,00,00,08,00,C8,8F,C3,09,99,6F,4E, 8D, 45 
1998 DATA CF,CF,CF,67,CF,CF,9B,CF,9B,CF,9B,67,CF,CF, 8A, C1 
2949 DATA 87,62,00,09,09, A9,F0,58,A9,F9,CB,9F,C3,99,99,6F 
2918 DATA 4E,BD,45,CF,CF,CF,67,CF,CF,9B,CF,9B,67,98B,67,CF 
2929 DATA CF,8A,C1,8F,82,99,90,58, A9,F9,59,A8,FO,CB,C3,C3 
2930 DATA 99,90,CB,0F,4B,45,CF,CF,CF,67,CF,CF,9B,CF,9B,67 
2949 DATA CF,67,CF,CF,8A,C1,9F,82,89,99, 09, A9, 59,09,90,00 
295à DATA CF,C3,C7,00,09,CF,C3,C7,45,CF,CF,CF,67,CF,CF,9B 
2968 DATA CF,9B,33,CF,67,CF,CF,8A,C1,C3, 82,09, 99, 98, AG,59 
2979 DATA 59,A9,F9,45,CF,8A,98,99,45,CF,8A,45,CF,CF,CF,67 
2989 DATA CF,CF,9B,CF,9B,33,CF,67,CF,CF, 8A,41,C3,99,00,90 
2990 DATA 99,A0,58,59, A9,F0,00,00,00,09,00,00,09,80,90,00 
2199 DATA 11,33,33, 33, 43,33, 33, 33, 33, 33, 33,33, 09,99,90,08 
2119 DATA 809,00,00,00,09,00,08,00,09,00,00,00,00,89,80,00 
2129 DATA 99,09,00,11,33,33, 33,33, 33, 33, 33, 33, 33,33, 33, 99 
2134 DATA 99,00, 00,00,00,08,08,00,09,00,09,09,90,08,00,89 
2149 DATA 09,09,09,09,00,00,05,33, 33, 33, 33,33, 33,33, 33,33 
2150 DATA 33,22,00,00,00,00,00,00,00,00,00,00,90,90, 00,00 
2169 DATA 00,08,00,00,09,00,09,09, 09,99, 33,33, 33,33, 33,33 
2170 DATA 33,33, 33,33, 22, 00,08,00,09,99,90,00,99,00,99,90 
2189 DATA 80,00,00,00,00,09,06,00,600,09,00,09,09,11,33,33 
2199 DATA 33, 33, 33,33, 33, 33,33, 99,09, 98,06,00,00,00,90,00 
2299 DATA 60,00,60,00,00,00,00,900,00,00,00,00,00,06,00,08 
2219 DATA 11,33, 33,33, 33, 33,33, 33,33, 33,09, 90, 89,00, 99, 09 
2229 DATA 09,09,00,00,00,09,06,00,09,00,00,09,00,00,00,09 
2239 DATA 09,09,09,00,33, 33,33, 33, 33, 33, 33,33, 22,99, 00, 99 
2248 DATA 99,00,08,90,00,09,00,09,00,00,00,00,00,09,00,09 
2259 DATA 09,00,09,00,09, 00,00, 11,33, 33,33,33, 33, 33, 33,90 
2269 DATA 05,08,00,00,00,00,09,00,00,99,00,00,00,00,00,08 
2278 DATA 09,09,00,00,00,00,08,00,08,00,06,33,33, 33, 33,33 
2288 DATA 33,22,09,09, 09,00, 09,09,09,00,90,00,00,00,00,09 
2298 DATA 69,00,00,00,09,00,00,00,00,00,00,00,89,09,90,33 
2399 DATA 33,33,35, 22,98, 00,00,00,00,00,00,00,00,00,00,00 
2319 DATA 09,09,09,00,00,00,00,00,080,060,00,00,00,00,09,29 
2328 DATA 98,29,90,09,90,29,19,30, A6, 39,10,B9, 70,B9, 20, A8 
2339 DATA 39,39,B4,78,39,20,B4,70,3C, 3C,B8,29,38,B4, B4, 78 
2348 DATA 78,29,38,B4,3C, 3C, 78, 39,79, 3C, 7C, BC, 3C,B#, 78, 3C 
2358 DATA FC,FC, 3C,B9, 74, 7C, EC, DC, BC, B8,784,7C,CC, CC, BC, B8 
2369 DATA 7, 7C,EC, DC, BC, BA, 78, 3C,FC,FC, 8C,B9, 79,30, 7C, BC 
2379 DATA 3C,B£,39,B4,3C, 3C,FA, 34,39, B4,Bû,3C, 78,39, 19,79 
2389 DATA 3C,B4,B4,29,59,39,B4, 76,39, 29, 29,39, 70,B0, 79,38 
2394 DATA 09,00,39,39,00,20,60,00,08,09,00,90,90,09, 00,80 
2499 DATA 44,CC,88,CC,CC,88,86,44,CC,CC, 98,99, 44, gC,8C, 8C 
2419 DATA 8C,99,98,0C,8C,EC,9C,99,94,0C,8C,4C, CB, 84, 8C 
2428 DATA 9C,8C, aC,88,84,CC, BC, AC, CC, 98, 8C,C8, 8C, 4C, C4, 8C 
2439 DATA 9C,C6,8C,4C,C4, DC, 40, DC, 8C, #C, 9C,@C, 90,84, 80, GC 
2449 DATA 4C,4C,98,89C,8C, C, 9C, 8C, #8, UC, BC, DC, BC, 8C, 98, C 
2458 DATA 8C,8C,4C,BC, 48, 9C,18,24,8C, 8C,9C,94,29, 19, 4C, QC 
2469 DATA 9C,0C,18,24,8C,8C, 8C,fC, 40, BC, DC, EC, 8C, AC, BC, GC 
2479 DATA 9C,9C,08,98,94,90,98,06,99,60,90,00,00,90, 09,89 
2489 DATA 90,99, 44,CC,88,CC,CC, 88,88, 44,CC,CC, 98,99, 44,40 
2499 DATA BC, B8C,6C,98,99,9C,8C, 8C, 9C, 89,94, 8C, 80, 4C, 8C, 88 
2589 DATA @4,8C,8C, AC, 4C,88,ÿ4,CC, BC, 9C, CC, 98, C,C8, BC, 4C 
2518 DATA C4,BC, AC, C8, BC, 4C,C4,8C,8C, BC, 8C, BC, BC, BC, BC, BC 


2524 DATA 8C,0C,4C, 8C, BC, AC, BC, AC, AC, BC, 8C, GC, 18, 24, 0C, GC 
2538 DATA 8C,9C,28,18,0C,0C,0C, 18,89, 08,24,0C,8C, 18,88, 44 
2548 DATA 24,0C,0C, 20,86, 44,19, 0C, BC, 18, 39, 39, 24,0C, OC, OC 
2559 DATA 4C, AC, AC, 0C, 98, 08,04, 09,98,08,09,00,60,00, 09,00 
2568 DATA 49,80,08,09, 44, CC, 88, CC, CC, 94, BB, 94, CC, CC, PB, 88 
2578 DATA 88,40, BC, BC, 8C, 98,08, 4C,9C,8C, 8C, AB, Ba, OC, AC, 8C 
2588 DATA 4C,88,94,BC, BC, AC, 4C, 08, 94, CC, BC, AC, CC, 08, DC, CB 
2599 DATA BC, 4C, CA, DC, 9C, CB, 8C, 4C,C, BC, 9C, BC, BC, BC, BC, PC 
2609 DATA AC, AC, 4C, AC, BC, OC, BC, BC, BC, AC, BC, AC, OC, AC, DC, GC 
2618 DATA AC, AC, AC, BC, AC, 8C,0C, DC, BC, BC, 38, 39,80, 4C, BC, 18 
2628 DATA #C, AC, 24, BC, BC, 24, 0C, BC, 18,80, BC, AC, OC, AC, DC, AC 
2639 DATA AC, C, AC, DC, 9C, 0,98, 04,04, 90,08,04,00,00,09,00 
2648 DATA 0,00,00,00,90,00,F3,00,F3,F3,00,F3,F3,F3,F3,F3 
2659 DATA F3,F3,42,F3,F3,F3,F3,51,F3,F3,F3,F3,F3,F3,51,F3 
2669 DATA D9,E6,F3, A2,51,E6,DB,E7, 9, A2, 51,E6, DB, E7, D9, A2 
2678 DATA F3,E6,D9,E6,D9,F3,F3,F3,B2,F3,F3,F3,F3,F3, 82, F3 
2688 DATA F3,F3,F3,F3,71,F3,F3,F3,F3,F3,71,F3,F3,F3,F3,F3 
2699 DATA B2,F3,F3,F3,51,F3,D0,E6,F3, 2,51,F3,D8,E6, F3, A2 
2708 DATA 51,F3,39,B0,F3,A2,08,B2,F3,F1,71,00,09,F3,F3,F3 
2718 DATA F3,90,09,51,F3,F3,A2,08,09,00,F3,F3,00,09, 00,00 
2729 DATA 99,00,00,00,00,00,09,00,00,49,CB, C3, 0A,08,09, 49 
273 DATA CB,C3,0A,00,99,00,C1,87,08,00,90,00,45,82, 00,09 
2708 DATA 09,08,45,82,00,00,00,00,45,82,09,90,00,00,45,82 
2754 DATA 99,90,00,00,45,62,00,00,99,00,45,82,00,04, 09, 00 
2768 DATA 45,82,00, 00,09, 00,45, 82, 09,09, 00,00, 45,82, 00,00 
2778 DATA 99,00,45,82,00,00,08,08,45,82,08,00,00, 09, 45, 82 
2788 DATA 90,00,09,00,05, 82, 09, 09,00, 00, 45,62, 00,09,00,00 
2798 DATA C1,87,09,06,99,40,CB,C3,0A, 08,00, 40, CB, C3, BA, 80 
2898 DATA 46,00,00,00,80,00,00, 09, 00,00, 44,09, 04,88, 00, 88 
2819 DATA 44,80, 4C,CC, 99,88, 4C, DB, 4C, CC, DA, 4C, CC, 4, CC, CC 
2828 DATA 88,4C, 49,84, CC, CC, CC, 29,99, 84,CC, CC, 8C, 09, 08,04 
2830 DATA 6a,68,88, 09,09, 04, 44, 88,88, 0, 08,9, CC, CC, 86, 80 
2848 DATA 46,94,CC,CC, 88, 00,09, 04, 98, 44, 88,09, 00, 0à, 08, 44 
2854 DATA 88,99,09,4p,4C, CC, 08, 98,08, 40, 4C, CC, 88, 09, 09, 08 
2869 DATA 4C,CC, 44,09, 00,98, 08, 4a, 44,99, CC, 99, 0C, CC, D, 4C 
2876 DATA 4C,90,04,88, 99, aC, 44, 08,00, 00,08,88, ue, 00, 00, 00 
2884 DATA 99,86,00,00,20,00,00,09, 00,00, 09,09, 00,09, 33,33 
2898 DATA 99,90,09,11,33,33,22, 08,98, 33, 13,33, 33,09, 09, 23 
2994 DATA 33,33,B9,09, 11, 23,33, 76, DC, 22, 11,13, 33, 76, DC, 22 
2919 DATA 11,13,33, 76, FC, 22,23, 13, 33, 33,89, 33,23, 13,33, 33 
2929 DATA 33,33,23, 13,33, 33, 33,33, 23, 13, 33,33, 33,33, 23,13 
2934 DATA 33,33, 76,33, 23, 13,33, 33,FC, 33, 11,13, 33,33, FC, 22 
2948 DATA 11,33,33,33,FC, 22, 11,33, 33,33, BO, 22, 09, 33, 33, 76 
2954 DATA 33,00,09,33, 33, 33,33, 04,08, 11,33, 33, 22,00, 09, 00 
2969 DATA 33,33,40, 09, 09,09, 06,90, 00,99, 00,09, 00,08,CF, CF 
2978 DATA CF,CF,CF,CF,CF,CF,CF,CF,CF,8F,CB,C3,C3,C3,C3, 87 
2988 DATA CB,C3,8F,C3,C3,87,CB, C7, 4B,C3,C3,87,CB,C7, 48, C3 
2998 DATA C3,87,CB,8F,C3,C3,C3,87,C5, 4F,4B,C3,C3,87,87,C3 
3909 DATA 8F,C3,C3,87,CB,C3,8F,C3,C3,87,CB,C3,C7,4B,C3,87 
3919 DATA CB,C3,C7, 48, C3, 67,CB,C3,C3,8F,C3,87,CB, C2, C3, CT 
3829 DATA 4B,87,CB,CD,C1,C3,C3, 87, CB, CD, CA, C3, C3, 87, CB, CD 
3834 DATA CA,C3,C3,87,CB, CD,C1,C3,C3,87,8F,C3,8F,9F, PF, BF 
3949 DATA 0F,0F,9F,0F,0F,0F, 09,00,00,00,00,09, 09,09,00,09 
3459 DATA CF,CF,CF,CF,CF,CF,CF,CF,CF,CF,CF,BF,CB, C3, C3,C3 
3968 DATA C3,87,CB,C3,C3,C3,C3, 87, CB, C3, C3, C3, C3,87, CB, C3 
3470 DATA 4F,C3,C3,87,CB, C3,87,CB, C3,87,C5,C3,87, CB, 87, 8F 
3989 DATA 87,CB,C3,4F,4F,87,CB, 4F,C3,87,CB,87,CB,87,C3,87 
3998 DATA CB, 87,CB,C3,C3,87,CB, 87, CB, C3,C3,4F,C3, 87, CB, C3 
3198 DATA 87,CB,C3,87,CB,C3,4F,C3,C3,87, CB, C3, 4F,C3, C3, 87 


)2G 
)2C 
>2G 
>YK 
>ZL 
>2D 
AZ 
)AZ 
)AX 
)ZL 
DZU 
JR 
»ZX 
AJ 
»BT 
>BC 
AY 
AN 
EN 
YZ 
)YD 
)YE 
»XK 
>XQ 
>XM 
JXN 
JXU 
)LY 
XT 
>AG 
AE 
)2B 
YF 
>2B 
>2X 
)YA 
De 
>XD 
>YD 
>Y4 
NY] 
JR 
YV 
>XD 
DYu 
CU 
>BD 
)AN 
AA 
JBL 
BG 
BE 
)YB 
>DA 
>AB 
AC 
)BB 
>BA 
)AX 


3119 DATA 
3129 DATA 
3130 DATA 
3149 DATA 
315$ DATA 
3169 DATA 
3178 DATA 
3189 DATA 
319ÿ DATA 
3299 DATA 
3219 DATA 
3229 DATA 
3239 DATA 
3248 DATA 
325@ DATA 
3269 DATA 
327 DATA 
3289 DATA 
3299 DATA 
3349 DATA 
3319 DATA 
3324 DATA 
3330 DATA 
3349 DATA 
3359 DATA 
3369 DATA 


54 ENT 
69 ENT 


79 MODE 1: 


1 


, 
St 
-9 


CB,C3,4F,03,C3,87,CB,C3,4F,C3,C3,87,68F,8F,C9,8F 
9F,9F,0F,0F,C9,9F,9F,0F, 60,99, 09,00,00,09,00,99 
69,06,00,00,09,50,09,00,09,900,58,58,09,09,00,80 
90,09,00,09,00,09,00,A8,A5,09,00,09,54,99,00,99 
99,00,54,50,09,09,00,00,54,00,00,08,00,88,CF,CF 
99,00,00,45,CF,CF,8A,99,09,CF,C7,CF,CF,98,99,CB 
4B,CF,CF,09,99,CB, 4B,CF,CF,08,90,CB,C3,CF,CF, 09 
90,CF,C3,CF,CF,00,08,CF,CF,CF,CF,09, 09, CF,CF,CF 
CF,09,00,CF,CF,CF,CF,00,09,45,CF,CF, 84, 96, 00,89 
CF,CF,00,60,00,00,00,00,06,00,00,09, 06,90,00,00 
09,09,09,09,00,09,F8,F0,00,90,90,F0,3C, 39, 3C, 89 
59,FC,3C, 39, 39,28, F4,FC, 3C, 38, 39, 74, 34,FC, 3C, 38 
39,F8,39,30,3C,38,FC,F9,38,38,FC,FC, F0, F9, 36, 39 
38,F0,F8,F4,34,38,35,F0,F4,F8, 39,34, 3C,FC,F8,F8 
19,30,39,F4,F8, A9, 14,39,38,F9,F 0, AB,99,3C,35,FQ 
FC,09,90,38,3C,FC,F,09,00,19,39,F9, AD,00,00,14 
39,F9,48,90,00,00,38,F4,00,00,90,00,34,F6, 09,09 
90,00,10,A9,00,09,08,09,19,A0,00,00,00,09,00,90 
09,00,00,00,09,00,90,00,49,688,00,90,00,49,Cÿ, 84 
98,00,00,C9, 84,96, 0C, 49,49, 84,84,9C, 0C, 88,49, 49 
48,96,8C,UB,C9,C9,9C,0C, 61, 4C,CH,8C, 96, 8C, 4C, 4C 
89,84,84,99,8C,4C,Cÿ,C9,0C,4C, DC, 4C, CA,84,0C,9C 
gc,CC,Cg,Cÿ,4C,0C,99,46,C8, 04,48, 8C,4C, 4C, 89, 84 
gc,C,8C,CC,C9,C9,06,96, 09, 4C, C9, 49, 98,80, 89,CC 
49,84,4C,9C,93,4C,48,C8,84,0C,96,688,99, 81,84, C 
8C,00,08,49,C9,06,66,99,00,00,94,0C, 00,00,09,99 


ACTREF - BAS 


7,1,14,-1,15 
,2,9,5,1,15,-1,18 
,1,3,5,1,15,-1, 29 
1,8,1,1,8 
»01,-16,1,1,6 
1,-1,6,1,1,6 
G:INK 9,9:INK 1,8:INK 2,8:PAPER D:PEN 


. 
245 
-3,1,9,2, 

BORDER 


, 


89 LOCATE 9,4:PRINT STRING$(3,143);" ";STRINGS(3,143);" 
M STRINGS(3, 143) ;" ":STRINGS (2,143) ;CHR$(215);" ";STR] 
NG$(3,143);" ":STRINGS(3, 143): LOCATE 9,5:PRINT CHR$(143 
);" MsCHR$(143);" ";CHRS(143) ; SPACES (4) ;CHR$ (143) ; SPACE 
$(2);CHR$(143);" ";CHRS(143);" °; 
99 PRINT CHR$(143) ; SPACES (3); CHR$(143) :LOCATE 9,6:PRINT 
STRINGS(3,1431;" ";CHR$(143) ;,SPACES (4) ;CHR$(143);" ; 
STRINGS (2,143) ;CHR$(212);" M" STRINGS(2,143);" ";STRING 
$(2,143) 

199 FOR i=g TO 1:LOCATE 9,7+i:PRINT CHR$(149);" ";CHR$( 
143);" "CHR$S (143); SPACES(4);CHR$(143);" ";CHR$(143) ;" 
"CHR (1431; "sCHRS(143);"  ;CHR$(143) :NEXT:LOCATE 

23,7:PRINT CHR$(215) 

119 LOCATE 9,9:PRINT CHR$(143);" ":CHR$(143);" "; STRING 
$(3,143);" ";CHR$S(143);" ";CHR$(143);" ";CHR$(143);" 

"STRINGS(3,143);" ";CHR$(143) :LOCATE 27,12:PRINT CHRS( 
164);" 1988":LOCATE 7, 16:PEN 2:PRINT"Progranmation : WE 
BER Gilles":LOCATE 2,18 

128 PRINT'Musique : MANIAC de SEMBOLLO Michael":LOCATE 


)PQ 
)UD 
DUF 
NT 
)UQ 
>UU 
>YP 


2 


YP 


)RK 


)MY 


19,19:PRINT"et MATKOSKY Dennis":LOCATE 6,21:PRINT"taper 
une touche pour jouer":LOCATE 4,23:PRINT'attendre pour 
entendre ’Maniac'" 

138 INK 1,26:INK 2,19:PEN ! 

149 OPENOUT"bidon":MEMORY 89123 :CLOSEOUT 

158 DEFINT a-z 

168 DIM no$(3,349),ca(3,399) 

179 DIM no(3),dt(3),d(3) 

189 can-1:syn=f:fin-ÿ 

19ÿ no$(1,91="X":n0$(2,9)="X":no$(3,8)="X" 

298 GOSUB 339 

218 GOSUB 669:G0T0 219 

229 MEMORY KAG67B:SYMBOL AFTER 47 

239 SYMBOL 97,9,62,127,99,127,127,99,99:SYMBOL 98,9, 126 
, 127,99, 126,99, 127,126:SYMB0OL 99,8,62,127,99,96,99, 127, 

62:SYMBOL 199,9, 126,127,99,99, 99, 127,126: SYMBOL 191,9,6 
3,127,96,129,96,127,63:SYMBOL 192,9,63,127,96,1289,129,9 

6,96 

249 SYMBOL 193,9,62, 126,96, 99,99, 127,62:SYMBOL 194,9,99 
,99,127,127,99,99,99:SYMBOL 195,9, 39,39, 12, 12, 12,38, 39: 
SYMBOL 196,9,31,31,6, 192, 192,126,69:SYMBOL 147,9,192,11 
9,124,124,126,193,99:SYMBOL 198,9,96,96,96,96,96, 127, 12 
; 

25ÿ SYMBOL 199,9,99,119,127,197,99,99,99:SYMBOL 119,9,9 

9,115,123,111,193,99,99:SYNBOL 111,9,28,62,119,90,119,6 
2,28:SYMBOL 112,9,126,127,99,127,126,96,96:SYMBOL 113,9 
,68,126,192,192,192,127,63:SYMBOL 114,9,126,127,99,127, 
126,193,99 

268 SYMBOL 115,8,63,127,96,127,3,127,126:SYMBOL 116,8,1 
26,126,24,24,24,24,24:SYMBOL 117,4,99,99,99,99,99, 127,6 

2:SYMBOL 118,9,99, 99,99, 99, 119,62,28:SYMBOL 119,9,99, 99 
,99,197,127,127,54:SYMBOL 125,9,99,119,62,28,62,119,09: 

SYMBOL 121,9,99,119,62,28,24,24,24 

278 SYMBOL 122,9,127,127,14,28,56,127,127:SYMBOL 123,9, 

62,127,99,99,99, 127,62:SYMBOL 124,9, 12,60,69, 12,12,63,6 

3:SYMBOL 125,4,62,127,90,6,28,127,127:SYMB0L 126,9,62,1 

27,99,15,99,127,62:SYMBOL 127,8,14,39,54,127,127,6,6:SY 

MBOL 128,9,127,127,96, 126, 7,127,126 

284 SYMBOL 129,8,62, 126,96, 126,193,127,62:SYMEOL 139,0, 

127,127,3,6,12,24,24:SYMBOL 131,9,62,127,99,62,99,127,6 

2:SYMBOL 132,9,62,127,99,63,3,63,62:SYMBOL 133,9,9,9,9, 

9,26,28,28:SYMBOL 134,9,54,95,95,127,62,28,8:SYMBOL 135 

,4,62,127,99,14,12,9,12 

29g SYMBOL 136,9, 9,16, 32,126, 32,16,9:SYMBOL 137,8,6,21, 

17,9,5,21,8:SYMBDL 138,9,137,85,21,21,21,85,137:SYMBOL 

139,9,156,88,89,152,89,89,92:SYMBOL 149,9,17,17,17,19,1 

7,17,20:SYMBOL 141,9,213,21,21,149,21,9,291:SYMBOL 142, 

9,298, 16,16, 144,16,16, 228 

389 SYMBOL 143,9,17,16,16,16,16,16,29:SYMEOL 144,9,213, 

149,149,149,149,137,291:SYMBOL 145,9, 299, 29,16, 136, 4,2 

, 289 

319 RUN'actref. jeu" 

328 

339 syn=9:ERASE ca,no$:DIM n0$(3,398) :esp=FRE("") 

349 no(1)=143:n0o(2)=161:n0(3)=213 

359 RESTORE 919:FOR sa={ TO 3:FOR ve=ÿ TO no(sa):READ n 

o$(sa, ve):NEXT ve, sa 

368 DIH ca(3,398) 

379 IF syn=ÿ THEN fin-=1:GOSUB 39ÿ:RETURN ELSE RETURN 


)UD 
)NV 
JC 
UK 
)RY 
RF 
)H2 
>GH 
QC 
AU 
)XD 


A 


P 


& 
+ 


V 


JC 


)TA 
)RF 
)TD 
)AC 
)AD 


EH 
TE 


388 GOSUB 668:G0T0 378 

398 d(1)=9:d(2):9:4(3)=9:dt(1)=9:dt(2)=#:dt(3)=9 

488 no$(1,9)="X":n0$(2,8)="X":n0$(3,8)="X" 

419 FOR ii:1 TO 3 

429 diii)=VAL(MID$(no$(ii,1),18,2)) 

430 NEXT ii 

44ÿ ca(1,1)=49:ca(2,1)=42:ca(3,1)=28 

459 IF fin=1 AND syn=1 THEN RETURN 

468 IF syn=1 THEN 669 

479 i=1:j=ttk=i 

489 FOR jj:1 TO 3 

499 FOR ii=1 TO no(jj)+i 

598 1F INKEY$<)"" THEN 229 

519 d=VAL(MID$(no$(jj,ii),18,2)) 

529 dt(jj)=dt(jj)+d 

539 NEXT 11, jj 

548 tpn=MAX(dt(1),dt(2),dt(3)) 

558 FOR tp=1 TO tpn-1 

569 IF INKEY$<C)"" THEN 229 

578 IF d(1)=tp AND d(2)=tp AND d(3)=tp THEN i=i+i:j=j+1 
tk=ktisca(1,i)=49:cal2, j)=42:ca(3,k)=28:G0SUB 829:GOSUB 
859:GOSUB 889:G0T0 649 

588 1F d(l)=tp AND d(2)=tp THEN i=iti:j=jtitca(1,i)=17: 
ca(?, j)=19:GOSUB 829:G0SUB 859:GO0T0 649 

598 IF d(1)=tp AND d(3)=tp THEN i=iti:k=k+f:ca(1,i)=33: 
ca(3,k)=12:G0SUB 829:GO0SUB 889:GO0T0 649 

699 IF d(2)=tp AND d(3)=tp THEN j=j+i:k=kti:cal2, j)=34: 
ca(3,k):29:GOSUB 859:G0SUB 889:G0T0 649 

619 IF dit)=tp THEN i=i+{:ca(1,i)=1:G0SUB 828:G0T0 649 
629 IF d(2)=tp THEN j=jti:ca(2, j)=2:GOSUB 859:G0T0 649 
639 1F d(3)=tp THEN k=k+1:ca(3,k)=4:GOSUB 889:G0T0 649 
649 NEXT tp:syn=1 

659 IF fin=i THEN RETURN 

668 ii=1:jj=1:kk=1 

679 IF INKEYS$<)"* THEN 229 

689 1F 5Q(1)=128 OR no$(1,ii-1)="" THEN 728 

699 dur=VALIMID$(no$(1,ii),18,2)):1F dur=# THEN dur=1:s 
o=ÿ:G0TO 719 

799 5o=VAL(MID$(no$(1,ii),14,4)) 

719 SOUND cat1,ii,so,dur#11,9,-1#(s0<8),-1#(s08):ii 
sji+] 

729 IF SQ(21=:128 OR no$(2,jj-12="" THEN 769 

734 dur=VAL(MID$(no$(2, jj),18,2)):1F dur=# THEN dur:=1:s 
o=g:GOTO 758 

749 50o=VAL(MID$(no$(2, jj),14,4)) 

754 SOUND ca(2, jj),50,dur#11,9,-2#(50€6),-2#(s0C$):jj 
:jj+1 

768 IF 5Q(41=128 OR no$(3,kk-12="" THEN 889 

778 dur=VAL(MID$(no$(3,kk),18,2)):1F dur=ÿ THEN dur=i:s 
0=0:GO0T0 799 

78ÿ so=VAL(MID$(no$(3,kk),14,4)) 

799 SOUND ca(3,kk),50,dur#11,9,-3#(50€)8),-3#(s0<)8):kk 
2kk+1 

898 1F jino(1) AND jjnot2) AND kk>no(3) THEN RETURN 
819 GOTO 679 

828 d=VALCMID$(no$(1,i),18,2)) 

838 d(1)=d(1)+d-(d/2)#(p=1) 

848 RETURN 

859 d=VAL(MID$(no$ (2, j),18,2)) 
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869 d(2)=d(2)+d-(d/2)#(p=1) 
879 RETURN 
889 d=VAL(MID$(no$(3,k),18,2)) 
898 d(3)=d(3)+d-(d/2)#(p=1) 

998 RETURN 
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DATA 688 27 
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13328 169 2 
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15129 159 2 
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78728 169 4 
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DATA 909 47 
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DATA 699 
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>RH 4419 
RQ | 4429 
RU 4438 
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99 
909 
990 
988 
990 
949 
990 
908 
900 
989 
598 
90) 
590 
988 
590 
904 
999 
999 
509 
999 
599 
999 
908 
989 
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999 
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25327 
25927 
26527 
27127 
27727 
28327 
28925 
29525 
34125 
39725 
31325 


31925 2 


32525 
33125 
33725 


34325 2 


34925 
35525 
36125 


36725 2 


37325 
37925 
38525 
39125 
39725 
49325 
49925 
41525 
42125 
42725 
43324 
43924 
44524 


45124 


45724 
46324 
46924 
47524 
48123 
48722 
49323 
49923 
54523 
51123 
51723 
52323 
52923 
53523 
54123 
54723 
55323 
55923 
56523 
57123 
57724 
58324 
58924 
59524 
68124 
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>QK 
>QY 


)QJ 
)QX 
QE 
)QC 
>QA 
)QH 
)QQ 
»QY 
)Qu 
Qu 
)QB 
)Q7 


4999 
5909 
5914 
5024 
5930 
5949 
5958 
5969 
5979 
5880 
5999 
5199 
5119 
5129 
5139 
5149 
5158 
5169 
5179 
5189 
5198 
5299 
5219 
522 
5239 
5249 
5259 
5269 
5274 
5284 
5299 
5394 
5319 
5329 
5339 
5349 
5354 
5369 
537 
5389 
5399 
5494 
5419 
5428 
5439 
5449 
545ÿ 
5469 
5479 
5484 
549ÿ 
5599 
5519 
5529 
5539 
5549 
5558 
5569 
5579 


DATA 969 
DATA 989 
DATA 999 
DATA 609 
DATA 990 
DATA 909 
DATA 909 
DATA 989 
DATA 998 
DATA 989 
DATA 909 
DATA 969 
DATA 890 
DATA 999 
DATA 099 
DATA 998 
DATA #99 
DATA 999 
DATA 948 
DATA 999 
DATA 868 
DATA 989 
DATA #89 
DATA 988 
DATA 690 
DATA 989 
DATA 998 
DATA 989 
DATA 998 
DATA 904 
DATA #98 
DATA 984 
DATA 909 
DATA 909 
DATA 696 
DATA 989 
DATA 690 
DATA 969 
DATA 608 
DATA 499 
DATA #96 
DATA 989 
DATA 690 
DATA 999 
DATA 998 
DATA 909 
DATA 909 
DATA 489 
DATA 898 
DATA #88 
DATA 998 
DATA 689 
DATA #08 
DATA 989 
DATA #00 
DATA 999 
DATA 968 
DATA 989 
DATA 908 
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69724 253 2 
61324 253 2 
61924 253 2 
62524 253 2 
63124 253 2 
63724 253 2 
64324 253 2 
64924 253 2 
65524 253 2 
66124 253 2 
66724 253 2 
67325 239 2 
67925 239 2 
68525 239 2 
69125 239 2 
69725 239 
79325 239 
79925 239 
71525 239 
72125 239 
12725 239 
73325 239 2 
13925 239 2 
74525 239 2 
75125 239 2 
75725 238 2 
76325 239 2 
76924 253 2 
77524 253 2 
78124 253 2 
78724 253 2 
19324 253 2 
79924 253 2 
89524 253 2 
81124 253 2 
81724 253 2 
82324 253 2 
82924 253 2 
83524 253 2 
84124 253 2 
84724 253 2 
85324 253 2 
85924 253 2 
86525 239 2 
87125 239 2 
87725 239 2 
88325 239 2 
88925 239 2 
89525 239 2 
99125 239 2 
99725 239 2 
91326 213 2 
91926 213 2 
92526 213 2 
93126 213 2 
93726 213 2 
94326 213 2 
94926 213 2 
95526 213 2 
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5589 
559ÿ 
5699 
5619 
5629 
5639 
5649 
5659 
5669 
5679 
5689 
5698 
5709 
5719 
5729 
573 
5749 
575 
5768 
5779 
5789 
5799 
5899 
5814 
5829 
5839 
584ÿ 
5859 
5869 
5879 
5889 
5899 
5999 
5919 
5924 
5939 
594ÿ 
5959 
5969 
5978 
5989 
5998 
6909 
6919 
6924 
6939 
6449 
6959 
6969 
6879 
6989 
6998 
6199 


18 MEMORY 8&994F :LOAD"code.scr" 


DATA 989 
DATA 908 
DATA 988 
DATA 899 
DATA 989 
DATA #98 
DATA 988 
DATA #98 
DATA 989 
DATA 599 
DATA 989 
DATA 999 
DATA 988 
DATA 899 
DATA 989 
DATA 909 
DATA 909 
DATA 999 
DATA 989 
DATA 999 
DATA 988 
DATA 999 
DATA 998 
DATA #99 
DATA 999 
DATA 998 
DATA 998 
DATA 669 
DATA 988 
DATA 698 
DATA 690 
DATA 969 
DATA 999 
DATA 969 
DATA 989 
DATA 698 
DATA 089 
DATA 099 
DATA 988 
DATA 998 
DATA 988 
DATA 898 
DATA 999 
DATA 998 
DATA 968 
DATA 999 
DATA 989 
DATA 899 
DATA 999 
DATA 699 
DATA 989 
DATA #99 
DATA 998 


2 
2 
2 
2 
2 
2 
2 
2 
2 
2 
2 
2 
2 
2 
2 


2 


2 
2 
è 
2 
2 
2 
2 
2 
2 
2 
2 
2 
2 
2 
2 
2 
2 
2 
2 
2 
2 
2 
2 
2 
2 
2 
2 
2 
2 
2 
2 
2 
2 
2 
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96127 

96727 

97327 

97927 

98527 

99127 

99727 
199327 
199927 
191527 
192127 
192727 
193327 
193927 
194527 
195127 
195725 
196325 
196925 
197525 
198125 
198725 
199325 
199925 
119526 
111126 
111726 
112326 
112926 
113526 
114126 
114726 
115327 
115927 
116527 
117127 
117727 
118327 
118927 
119527 
129127 
129727 
121327 
121927 
122527 
123127 
123727 
124327 
124923 
125523 
126123 


198 2 
199 2 
198 2 
199 2 
199 2 
199 2 
199 2 
199 2 
199 2 
198 2 
198 2 
199 2 
198 2 
199 2 
199 2 
198 2 
239 2 
239 2 
239 2 
239 2 
239 2 
239 2 
239 2 
239 2 
213 2 
213 2 
213 2 
213 2 
213 2 
213 2 
213 2 
213 2 
199 2 
198 2 
199 2 
199 2 
198 2 
199 2 
199 2 
199 2 
199 2 
198 2 
199 2 
199 2 
199 2 
199 2 
199 2 
199 2 
284 2 
284 2 
284 2 


2 126723 284 2 
8 127323 284 8 


ACTREF - JEU 


>QH 
)0Q 
)Q 
)QL 
)QJ 
»Q6 
)QP 
RG 
RP 
)RH 
>RK 
)RT 
RF 
)RN 
RL 
)RJ 
RU 
)RR 
)RZ 
)RI 
RV 
)RC 
RQ 
)RY 
RD 
)RB 
JR] 
RG 
>RP 
RH 
)RK 
RT 
RL 
)RU 
>RR 
)RP 
)RX 
)RV 
)RC 
)RA 
)RN 
)RY 
)RZ 
RG 
RE 
)RC 
>RK 
RH 
)RQ 
)RN 
RL 
)RU 
)RV 


)BU 


fS 


NU 


28 ENV 1,3,2,4,2,-3,2:ENT -1,2,19,2,3,-5,4:ENV 2,25, -8, 
2,25,8,2:ENT 2,5, -29,38, 2,58, 49,6, -26,39,2,59, 49,7, -29, 
3B:ENV 3,15,-1,19:ENT -3,19,4,1,1,-29,1:ENV 4,15, -1,39: 
ENT -4,31,1,5,26,2,5,22,4,5,29,6,5,5,19,5:ENV 5,15,-1,1 
DENT -5,19,4,1,1,-29,1 

39 FOR i=8 TO 22:READ a$:POKE &A69D+i, VAL("&"+a$) :NEXT 

49 DATA 21,98,98,06,14,c5,e5, 86, 86, 3e,09,77,23,19,fa,el 
,cd,26,bc,ct,18,ef,c9 

59 FOR i=8 TO 27:READ a$:POKE RAG28+i, VAL("&"+a$) :NEXT 

68 DATA 11,69,99,21,09,00, 3e, 14,47,c5, d5,3e,06,4f,06,08 
,ed,b9,eb,el,cd,26,bc,eb, cl, 18,ee, cq 

79 FOR i=9 TO 46:READ a$:POKE &9958+i, VAL("&"+a$) :NEXT 

89 DATA 3e,b7,f5,21,99,00,11,99,91,91,84,89,e5, c5, ed, bÿ 
,ct,et,54,5d, cd, 26,bc,e5,d5,c5, ed, bÿ,ci,dt,e1,99,08,08, 
f1,3d,f5,28,eb,f1,11,99,91,eb, ed, b9,c9 

98 DIM p(19, 19), trans(19) ,score$(25),nomrec$(25),scoret 
25) 

189 trans(11=49152:trans(2):57594:trans(3)=49552:trans( 
4):57994:trans(5)=49952:trans(6)=58384:trans(7)=59352:t 
rans(8)=58784:trans(9)=59752:trans(19)=59194 

119 OPENIN"record" 

129 FOR i=1 TO 25:INPUT #9, scoreti),nonrec$(i),scoref(i 
):NEXT 

139 CLOSEIN 

149 GOTO 3149 

159 FOR i=1 TO 15:1NK i,8:NEXT 

168 LOCATE 16,1:PEN 11:PAPER 1:PRINT CHR$(213) ; :PAPER 1 
LEPRINT" "3 :PEN 11:PAPER 9:PRINT CHR$(212):PEN 1:PAPE 
R 11:LOCATE 16,25:PRINT CHR$(212)"  ";:PEN 9:PRINT CHR 
$(213);:PAPER 1:FOR i=2 TO 24:LOCATE 16,i:PRINT" ":NEXT 


179 PAPER 9:FOR i:2 TO 24:LOCATE 29, i:PRINT" ":NEXT:PAP 
ER 14:FO0R i=2 TO 24:LOCATE 19, j:PRINT" ":NEXT 

189 PAPER 9:PEN 3:LOCATE 17,3:PRINT CHR$(137);CHR$(138) 
:CHRS (139) :LOCATE 17,19:PRINT CHR$(148) ;CHR$(141) ; CHRS( 
142):LOCATE 17,15:PRINT CHR$(143) ;CHR$(144) ;CHR$(145) :L 
OCATE 18,17:PRINT CHR$(126) 

198 LOCATE 18,12:PRINT CHR$(124):FOR i:5 TO 8:LOCATE 18 
,itPRINT CHR$(123) :NEXT:LOCATE 18,22:PRINT CHR$(123) :LO 
CATE 18,23:PRINT CHR$(123) 

290 POKE LAG621,4E3:POKE &A622,&C5:POKE BA624,&76:POKE & 
A625,&9E:CALL &A629 

218 PEN 3:PAPER 9:G0T0 2189 

228 

238 ? haut 

249 

250 IF INKEY(9):9 OR JOY(#)=1 THEN y=y-i ELSE 319 

268 IF y<i THEN y=1:G0T0 319 

278 IF plx,y)=2 OR plx,y)=19 OR plx,y)=7 THEN y=y+1:G0T 
0 319 

288 GOSUB 1449:1F mo=1 THEN y=y+1:G0T0 2528 

298 ancx=x:ancy=yt1:GOSUB 1859:nvelx=x:nvely=y:GOSUB 18 


328 

338 1F INKEY(2):8 OR J0Y(#)=2 THEN y=y+1 ELSE 498 

349 IF y>19 THEN y=19:G0T0 498 

359 IF p(x,y)=2 OR ptx,y)=18 OR p(x,y)=7 THEN y=y-1:G0T 


)QL 


JU 


NV] 
RE 
RF 
)RG 
)PT 
VA 
>CN 


KP 
>GN 


RD 
)RE 
RF 
)PT 
>XK 
)CP 


43 


0 488 

366 GOSUB 1449:1F mo=i THEN y=y-1:G0TO 2529 

379 ancx=x:ancy=y-1:GOSUB 185#:nvelx=x:nvely=y:GOSUB 18 
98 

389 IF y>2 THEN IF plx,y-2)=2 OR ptx,y-2)=7 THEN refx=x 
trefy=y-2:G0SUB 1259 ELSE IF ptx,y-2)=5 THEN refx=x:ref 
y=y-2:GOSUB 1198 

398 

498 ‘ gauche 

419 ? 

429 IF INKEY(8):9 OR JOY(@)=4 THEN x=x-1 ELSE 518 

439 IF x<i THEN x=1:G0T0 514 

449 IF px,y)=2 OR plx,y)=19 THEN x=x+1:G0TO 519 

458 IF plx,y)=7 THEN x=xti:GOSUB 1999:G0TD 519 

469 GOSUB 1449:1F mo=i THEN x=x+1:GDTO 2528 

#79 ancx=xtitancy=y:GOSUB 1858:nvelx=x:nvely=y:GOSUB 18 
99 

489 GOSUB 1428 

490 IF plxti,y-1):2 ÜR ptx+1,y-11:7 THEN refx=x+l:refy= 
y-1:GO0SUB 1259 ELSE IF ptx+ti,y-1)=5 THEN refx=xti:refy= 
y-1:G0SUB 1198 

596 

519 ' droite 

528 

539 IF INKEY(1):9 OR J0Y(#)=8 THEN x=x+i ELSE 629 

549 1F x>19 THEN x=19:GO0T0 628 

559 IF ptx,y)=2 OR plx,y)=18 THEN x=x-1:G0T0 629 

568 IF plx,y)=7 THEN x=x-1:GOSUB 297#:G0T0 629 

578 GOSUB 1449:1F mo={ THEN x=x-1:G0T0 2528 

588 ancx=x-{:ancy=y:GOSUB 1858:nvelx=x:nvely=y:GOSUB 18 
98 

598 GOSUB 1428 

608 IF px-1,y-1)=2 OR ptx-1,y-12=7 THEN refx=x-1:refy= 
ÿ-1:GOSUB 1258 ELSE IF plx-1,y-1):5 THEN refx=x-l:refy= 
y-1:G0SUB 1198 | 

619 ’ test bonbe 

628 IF INKEY(47)#INKEY(77)©)8 THEN 779 ELSE IF bonbe:ÿ 

THEN 778 

639 IF INKEY(S)#INKEY(72)=9 THEN 688 

649 IF INKEY(2)#INKEY(73)=9 THEN 799 

659 IF INKEY(B)#INKEY(74)=9 THEN 728 

669 IF INKEY(1)#INKEY(75)=9 THEN 749 

679 GOTO 77 

689 IF y<2 THEN 779 ELSE IF plx,y-1)=19 THEN 778 

698 nvelx=x:nvely=y-1:type=11:G0SUB 1899:ancx=x:ancy=y- 
1:GOSUB 1858:FO0R j=15 TO 1 STEP -1:SOUND 2,9,5,j,9,8,1: 
NEXT:ex=x:ey=y-1:G0SUB 1599:G0TO 7684 

798 IF y>9 THEN 779 ELSE IF ptx,y+1)=18 THEN 779 

719 nvelx=x:nvely=y+1:type=11:G0SUB 1899:ancx=x:ancy=y+ 
1:GOSUB 1858:FOR j=15 TO { STEP -L:SOUND 2,4,5, j,9,8,1: 
NEXT:ex=x:ey=y+1:G0SUB 1599:G0T0 768 

728 IF x<2 THEN 779 ELSE IF ptx-1,y)=19 THEN 779 

738 nvelx=x-1invely=y:type=11:GOSUB 1899:ancx=x-1:ancy= 
y:GOSUB 1858:FOR j=15 TO 1 STEP -1:SOUND 2,9,5, j,9,9,1: 
NEXT:ex=x-1:ey=y:GOSUB 1599:G0T0 768 

749 IF x>9 THEN 779 ELSE IF plxti,y)=19 THEN 779 

758 nvelx=xti:nvely=y:type=11:GOSUB 1898:ancx=x+1:ancy= 
y:GOSUB 1858:FOR j=15 TO 1 STEP -1:SOUND 2,8,5,j,4,8,1: 
NEXT:ex=x+i:ey=y:GOSUB 1598 
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RE 
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)PD 
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)MB 
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ML 
)LB 
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Ù 
769 bombe=bombe-1:GOSUB 1548 )XC 
179 IF INKEY(69)=9 THEN 2618 JVL 
789 IF monstrei=9 OR anmi=9 THEN anmi=1:G0T0 239 )QE 
199 anni-8 >NK 
898 FOR i=1 TO monstre! )RY 
819 a-ÿ )NB 
829 IF montx(i)>x THEN monix(i)=montx(i)-1 ELSE 878 >VW 
838 IF pimontx(i),moniy(i)})=2 OR p(monix(i),noniy(i))>4 >XL 
THEN monix(i)=montx(i)+1:G0TO 928 
848 ancx=nontx(i)+{:ancy=moniy(i):vx(i)=ancx:vy(i)=ancy DZT 
:GOSUB 1859:GOSUB 14929:GOSUB 1949 
859 IF pimontx(i)+{,monty(i)-1)=2 OR p(nonix(i)+i,moniy DTL 
(1)-1)=7 THEN refy=monty(i)-1:refx=monix(i)+1:GOSUB 125 
$ ELSE IF pimonix(i)+{,monly(i)-1)=5 THEN refy=monly(i) 
-{trefx=montx(i)+1:GOSUB 1198 
868 GOTO 99ÿ AJ 
879 IF montx(i)(x THEN monix(i)=monix(i)+i ELSE 924 JVT 
888 IF p(montx(i),monty(i))=2 OR p(montx(i),noniy(i))24 DXU 
THEN monix(i)=monix(i)-1:G0TO 928 
899 ancx=nontx(i)-t:ancy=moniy(i):vx(i)=ancx:vy(i)=ancy )ZA 
:GOSUB 1859:GOSUB 1929:GOSUB 1949 
998 IF plmontx(i)-t,monty(i)-1)=2 OR p(monix(i)-1,noniy >TT 
(i)-1)=7 THEN refy=monty(i)-{:refx=montx(i)-1:GOSUB 125 
$ ELSE IF plmonix(i)-{,monty(i)-1)=5 THEN refy=moniy(i) 
-{irefx=monix(i)-1:GOSUB 1198 
918 GOTO 99ÿ DAE 
928 IF moniy(i)>y THEN moniy(i)=monty(i)-1 ELSE 959 VA 
938 IF pimontx(i),moniy(i)})=2 DR pimonix(i),noniy(i))>4 >XX 
THEN moniy(i)=monty(i)+1:G0T0 994 
84ÿ ancx=montx(i):ancy=moniy(i)+{:vx(i)=ancx:vy(i)=ancy )ZU 
:GOSUB 1859:GOSUB 1929:GOSUB 1949 
954 IF noniy(i)Cy THEN moniy(i)=moniy(i)+{ ELSE 99ÿ )VD 
969 IF p(montx(i),monty(i))=2 OR p(monix(i),monty(i))>4 >XC 


THEN nonlyli)=moniy(i)-1:G0T0 999 
979 ancx=nonix(i):ancy=moniy(i)-1:vx(i)=ancx:vy(i)=ancy 
:GOSUB 1858:GOSUB 1929:G0SUB 1949 


989 1F p(nonix(i),monty(i)-2)=2 OR p(montx(i),moniy(i)- 


227 THEN refy=moniy(i)-2:refx=monix(i):GOSUB 1258 ELSE 
IF p(monix(i),moniy(i)-2):5 THEN refy=monliy(i)-2:refx: 

ponix(i):GOSUB 1194 

99ÿ IF monix(i)=x AND moniy(i)=y THEN 2529 

1999 IF a=ÿ THEN GOSUB 1929 

1919 NEXT:GOTO 239 

1928 a={invelx=monix(i):nvely=monly(i):erty=INT(RND#18) 
+1:1F erty<S THEN type=9:G0SUB 1899 ELSE IF erty<9 THEN 
type=8:GOSUB 1899 ELSE type-14:GO0SUB 1899 

1939 RETURN 

1949 ‘ test monstrei 

1959 IF p(nonix(i),moniy(i))=4 THEN plmonix(i),moniy(i) 
)=8:GOSUB 1679:RETURN 

1869 IF p(montx(i),moniy(i))=1 THEN p(monix(i),moniy(i} 
)=ÿ:sc=sc+1:SOUND 2,498,9,15,1,2:G0SUB 16/9:objet=objet 

#1:1F objet=nbobjet THEN 2189 ELSE RETURN 

1978 RETURN 

1989 RETURN 

1998 

1189 ‘ chute d'un destructeur 

1119 GOSUB 1678 

1128 derrefy-refy-1 


1139 IF refy+1=y AND refx=x THEN 2528 )DL 
1148 IF refy»9 THEN 1298 )RX 
1158 FOR wu=i TO monstrei:IF refy+1=moniy(w) AND refx=mo >JG 
nix(w) THEN monstrei=monstret-1:1F monstrei=f THEN 1179 


1169 NEXT w >WH 
1178 IF refy>9 THEN 1219 )RB 
1188 prefx,refy)=f:ancx=refx:ancy=refy:GOSUB 1859 )YR 


1199 refy-refy+l:p(refx,refy)=5:nvelx=refx:nvely=refy:t >NZ 
ype=2:GOSUB 1899:SOUND 2,68+(6xrefy),19,9,2,2:GOT0 1138 
1299 nvelx=refx:nvely=refy:type=11:GOSUB 1899:ancx=refx >TK 
tancy=refy:GOSUB 1859:p(refx,refy)=ÿ:FOR j=15 TO 1 STEP 
-1:SOUND 2,8,5,j,8,9,1:NEXT j 

1218 IF plrefx,derrefy)=2 OR p(refx,derrefy)=7 THEN ref )CC 

y=derrefy:G0TO 1254 


1229 IF plrefx,derrefy)=5 THEN refy-derrefy:G0TO 1199  D2J 
1239 RETURN )EK 
1249 ? JXK 
1258 ’ chute d’une pierre YA 
1269 )YE 
1279 nbpierres={:refytest=refy )CP 
1289 refytest=refytest-1:1F refytest(i THEN 1399 VU 
1299 IF plrefx,refytest)=2 OR ptrefx,refytest)}=7 THEN n JT 
bpierres=nbpierres+i:G0T0 1284 ELSE 1389 

1389 derrefy=refy-nbpierres )YE 
1319 IF refy+1=y AND refx=x THEN 2528 )DL 
1328 FOR w=1 TO monstret:1F refy+1=monty(w) AND refx=mo >VL 
nix(w) THEN 1418 

1339 NEXT w WG 
1349 IF refy)9 THEN 1490 )RB 
1359 IF pCrefx,refy+1)<>9 THEN 1499 BY 
1369 ptrefx,refy-nbpierresti)=ÿ:ancx=refx:ancy=refy-nbp >GG 
ierres+i:GOSUB 1859 

1379 refy=refy+i >MH 
1389 p(refx,refy)=2:nvelx=refx:nvely=refy:type=1:G0SUB BH 
1894: SOUND 2,69+(6xrefy),19,9,2,2 

1399 GOTO 1319 )MF 
1499 IF plrefx,derrefy)=5 THEN refy-derrefy:GOT0 1199 DZ] 
1419 RETURN )EK 
1429 RETURN )FA 
1439 )YA 
1449 ? test )YB 
1459 VC 
1469 IF plx,y)=6 OR p{x,y)=5 THEN mo=1:RETURN )NG 
1479 IF plx,y)=4 THEN SOUND 2,499,9,15,1,2:bonbe=bombe+ DWJ 
1:plx,y)=f:sc=sc+25:GOSUB 1679:G0SUB 1549:RETURN 

1489 IF plx,y)=1 THEN SOUND 4,199,32,9,1,1:objet=objet+ >RQ 
Liplx,y)=f:sc=sc+t19:GOSUB 1678 

1499 IF objet=nbobjet THEN 2298 ELSE RETURN )LX 
1599 IF p(x,y)=3 THEN GOSUB 1599:RETURN )GY 
1519 RETURN )FA 


1528 1F k=1 THEN type=4:GOSUB 1899:RETURN ELSE IF°k=2 T >VW 
HEN type=1:GOSUB 1899:RETURN ELSE IF k=4 THEN type:6:G0 

SUB 1899:RETURN ELSE IF k=5 THEN type=2:GOSUB 189f:RETU 

RN ELSE IF k=6 THEN type=3:GO0SUB 1899 :RETURN 


1538 RETURN )FC 
1549 b$=-DEC$ (bombe, "##") )RI 
1559 FOR w=i TO 2:z$=MID$(b$,w, 1):LOCATE 18,21tu:IF 2$= FU 


M" OR z$="#" THEN PRINT CHR$(123):GO0TO 1578 
1569 z=VAL(z$):0N z GOSUB 1759,1769,1779,1788,1799, 1899 >QZ 
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NU 
, 1819, 1829, 1839 
1579 NEXT w )XC 
1589 RETURN )FH 
1599 IF plex,ey)=1 THEN objet=objet-1:G0T0 1659 )QU 
1699 FOR i=1 TO monstrel )TM 
1619 IF ex=monix(i) AND ey=nonfy(i) THEN sonstrei=nonst )QQ 
rei-1:1F monstrei=ÿ THEN 1659 
1629 NEXT i DVE 
1639 plex,ey)=ÿ )CG 
1649 IF pex,ey-1)=2 DR plex,ey-1)=7 THEN refx=ex:refy= DHX 
ey-1:GOSUB 1258 ELSE IF pex,ey-1)=5 THEN refx=ex:refy= 
ey-1:GOSUB 1199 
1659 RETURN )FF 
1669 ’ affichage du score YF 
1678 sco$=DEC$ (sc, "##4#") )RG 
1689 FOR u=1 TO à DEA 
1699 z$=MID$(sco$,w,1) )QY 
1799 LOCATE 18,4+w MC 
1719 IF z$=" " OR z$="g" THEN PRINT CHR$(123):GOTO 1739 DWK 
1729 z=VAL(z$):0N z GOSUB 1759,1769,1779, 1789, 1799, 1899 >QX 
,1819,1828, 1839 
1739 NEXT w >XA 
1749 RETURN )FF 
1759 PRINT CHR$(124) ; :RETURN >XK 
1768 PRINT CHR$(125) ; :RETURN )XM 
1778 PRINT CHR$(126) ; :RETURN XP 
1788 PRINT CHR$(127) ; :RETURN )XR 
1799 PRINT CHR$(128) ; :RETURN JXU 
1898 PRINT CHR$(129) ; :RETURN XL 
1819 PRINT CHR$(139) ; :RETURN >XD 
1828 PRINT CHR$(131) ; :RETURN XF 
1839 PRINT CHR$(132) ; :RETURN >XH 
1849 ' effacement YF 
1859 adr=trans(ancy)+(ancx-1)#6 )AM 
1868 ad$=HEX$(adr):POKE &A691, VAL("&"+MID$(ad$,3,2)):P0 FR 
KE &A692, VAL("&"+MID$(ad$,1,2)):CALL LA698 
1879 RETURN )FK 
1889 ‘ affichage YK 
1898 adr=trans(nvely)+(nvelx-1)x6 )DB 
1999 ad$=HEX$(adr) :POKE &A621, VAL("&"+MID$(ad$,3,2)):PO )PZ 
KE &A622, VAL("&"+MID$(adé, 1,2)) 
1919 IF nvelx=x AND nvely=y THEN POKE &A624,BGA:POKE &A DVP 
625,49B:GO0TO 1978 
1929 IF type=1 THEN POKE &AB24,87A:POKE &A625,&9F:G0TD DQN 
1979 ELSE IF type=2 THEN POKE &A624,8F8:POKE &AG25, KE: 
GOTO 1979 
1939 JF type=3 THEN POKE &AG24,86E:POKE &A625,89C:G0TD )QH 
1979 ELSE IF type=4 THEN POKE &AG24,8FG:POKE LAG25, &9C: 
GOTO 1979 
1949 1F type=5 THEN dfgh=INT(IRND#2)+#1:1F dfgh=1 THEN PO DNJ 
KE &A624,8&F4:POKE &A625,89D ELSE POKE &A624,472:POKE &A 
625, k9D 
1959 IF type=6 THEN POKE &AG24,&76:POKE &A625,&9E ELSE )XH 
IF type=7 THEN POKE &AG624,&EC:POKE &A625,89B ELSE IF ty 
pe=11 THEN POKE &A624,&62:POKE &AG25, 499 
1969 IF type=8 THEN POKE &AG24,8&EB:POKE &AG25,&9A ELSE >XR 
IF type:9 THEN POKE &AG624,&66:POKE &A625,KOA ELSE IF ty 
pe=19 THEN POKE &A624,LE4:POKE &A625, &99 
1979 CALL &A62ÿ >TD 





1984 RETURN 

1998 IF x<3 THEN 2969 ELSE IF plx-2,y)©8 THEN 2969 

2898 FOR i=1 TO monstre! 

2819 IF monix(i)=x-2 AND monty(i)=y THEN 2968 

2929 NEXT 

2839 ancx=x-1:ancy=y:GOSUB 1859:nvelx=x-2:nvely=y:type= 
1:GOSUB 1899:p(x-1,y)=9:p(x-2,y)=7 

2949 IF plx-1,y-1)=2 OR plx-1,y-1)=7 THEN refx=x-l:refy 
zy-1:G0SUB 1259 ELSE IF ptx-1,y-1)=5 THEN refx=x-1:refy 
=y-1:GOSUB 1199 

2958 IF p(x-2,y+1)=9 THEN refx=x-2:refy=y:GOSUB 1259 

2868 RETURN 

2979 IF x>8 THEN 2148 ELSE IF plx+2,y)©8@ THEN 2149 

2588 FOR i=1 TO monstrel 

2998 1F monix(i)=x+2 AND moniy(i)=y THEN 2148 

2198 NEXT 

2119 ancx=xti:ancy=y:GOSUB 1859:nvelx=x+2:nvely=y:type= 
1:GOSUB 1899:p(x+t,y)=8:p(xt2,y)=7 

2129 IF pCxti,y-1)=2 OR plxti,y-1)=7 THEN refx=xtl:refy 
zy-1:GOSUB 1259 ELSE IF pCx+1,y-1)=5 THEN refx=xt{:refy 
=y-{:GOSUB 1199 

2139 1F pCx+2,y+1)=9 THEN refx=x+2:refy=y:GOSUB 1259 
2149 RETURN 

2159 CLS:MODE 1:PEN 1:LOCATE 5,{:PRINT'"'bravo , vous ete 
s parvenu à traverser l'ultime plateau . le dieu reflec 
tus n'a pu supporter cet affront et a deja quit-te la 
region . desormais votre peuple va "; 

2169 PRINT"pouvoir mener une vie tranquille . quant a v 
otre sort , vous etes devenu le heros de toute une pop 
u- lation qui savoure des maintenant les journees pai 
sibles a venir ." 

2179 INK 1,26:CALL &BB18:MODE f:sc=5sc+1999:G0T0 2629 

2188 

2198 ' affichage des tableaux 

2299 flag=9:FOR i=9 TO 15:INK i,9:NEXTiniv=niv+i:[F niv 
219 THEN 2158 

2218 x=8:y=ÿ:anni=f:nbobjet=g:objet:ÿ 

2229 niv$=DEC$ (niv, "##") 

2238 FOR w=1 TO 2 

2249 z$=MID$(niv$é,w,1):LOCATE 18,11+u 

2258 IF z$=" " OR z$="9" THEN PRINT CHR$(123) :GOTO 2268 
ELSE z=VAL(z$):0N z GOSUB 1759,1768,1770,1789, 1799, 199 

5,1819, 1829, 1839 

2269 NEXT w 

2278 FOR i=1 TO 19:FOR j=1 TO 19:ancx=j:ancy=i:GOSUR 18 

SA: NEXT j,i 

2288 FOR i=1 TO 19 

2299 FOR j=1 TO 18 

2399 READ typecase 

2319 IF typecase=ÿ THEN p(j,i)=#:G0T0 2419 

2329 IF typecase={ THEN nbobjet=nbobjet+1:p(j,i)=1:type 
=4:G0TO 2499 

2339 1F typecase=2 THEN p(j,i)=2:type=1:G0T0 2499 

2349 IF typecase=3 THEN p(j,i)=#:type=7:G0T0 2499 

2359 IF typecase=4 THEN plj,i)=4:type=6:G0T0 2499 

2368 IF typecase=5 THEN p(j,i)=5:type=2:G0T0 2499 

2379 1F typecase=6 THEN plj,i)=6:type=3:G0TO 2499 

2388 IF typecase=9 THEN p(j,i)=18:type=5:G0T0 2499 

2399 1F typecase=7 THEN plj,i)=7:type=1:flag=1 
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)HX 


NU 
2499 nvelx=j:nvely=i:GOSUB 1899 )BP 
2419 NEXT j,i XKF 


2429 READ monstret:[F monstre1>8 THEN FOR i=1 TO monstr )JK 
e1:READ monix(i),monty(i):inx(i)=monix(i):iny(i)=monty( 
i):nvelx=montx(i):nvely=monty(i):type=8:GOSUB 1899:NEXT 
2439 READ x,y:nvelx=x:nvely=y:GOSUB 1898 )LQ 
2448 INK 1,1:INK 2,18: INK 3,26: INK 4,3:INK 5,6:INK 6,15 DYR 
LINK 7,24:INK 8,9:INK 9,14:INK 19,28:INK 11,2:INK 12,18 

2 INK 13,16:INK 14,8:INK 15,3:1F flag=9 THEN FOR i=1 TO 
1598:NEXT: SOUND 2, 499,9,15,5,2:FO0R i={ TO 268:NEXT:G0TO 

238 


2459 type=1 )AG 
2468 FOR i=1 TO 19 LG 
2479 FOR j=1 TO 19 )LJ 


2489 IF ptj,i)=7 THEN ancx=j:ancy=i:GOSUB 185#:nvelx=j: >BT 
nvely=i:GOSUB 1898 


2499 NEXT j,i >LD 
2598 FOR i=1 TO 1999:NEXT:SOUND 2,499,9,15,5,2:FOR i=1 DXT 
TO 289:NEXT:GOTO 23ÿ 

2518 ‘ mort )YA 
2528 no=f:vie=vie-1 )PX 


2539 IF vie=f THEN LOCATE 18,17:PRINT CHR$(123):FOR i=1 DCF 
TO 1999:NEXT:GO0TO 2614 

2549 SOUND 2,898,9,15,3,3:LOCATE 18,17:0N vie GOSUB 175 DDN 
9,1769,1770,1789, 1799, 1899, 1819, 1829, 1839 

2559 FOR i:1 TO nonstrel TT 
2568 ancx=montx(i):ancy=monty(i):GOSUB 1858 )NQ 
2578 montx(i)=inx(i):moniy(i)=iny(i):nvelx=montx(i):nve DXW 
ly=monty(i):type=8:GOSUB 1898 


2588 NEXT )LG 
2598 nvelx=x:nvely=y:G0SUB 189ÿ >BH 
2649 FOR i=1 TO 2989:NEXT:G0TO 239 DAX 


2619 CLS:SOUND 1,88,398,15,4,2,29:1F seCscore(25) THEN KY 
LOCATE 8,4:PRINT "actref":LOCATE 5,6:PRINT"copyright "; 
CHR$ (124) :CHR$ (132) ;CHR$ (131); CHR$(131):LOCATE 5, 14:PRI 
NT'score nediocre":FOR i=1 TO 19899:NEXT:GOTO 3149 

2628 LOCATE 8,8:PRINT"bravo":LOCATE 2,14:PRINT"votre no ?NE 
ai" 

2639 non$="":car=97:nblet=Q:LOCATE 14,14:PRINT CHR$(97) DAX 
2648 IF INKEY(9)=9 OR INKEY(72)=9 THEN IF car(136 THEN AW 
car=car+{:LOCATE t4tnblet,14:PRINT CHR$(car) ELSE car=9 
7:LOCATE {4tnblet,14:PRINT CHR$(car) 

2658 IF INKEY(2)=9 OR INKEY(73)=9 THEN IF car>97 THEN c AL 
ar=car-1:LOCATE 14+nblet,14:PRINT CHR$(car) ELSE car=13 
6:LOCATE 1étnblet,14:PRINT CHR$(car) 

2668 IF INKEY(47)C>8 AND INKEY(76)O8 AND INKEY(77)O08 DR 
THEN FOR i=1 TO 199:NEXT:GOTO 2649 

2679 IF car=136 THEN IF nblet>9 THEN LOCATE {4+nblet,14 >VG 
PRINT" "enblet=nblet-1:LOCATE 14+nblet,14:PRINT CHR$(9 
7):car=97:nom$=LEFT$(nom$,nblet):FOR i=1 TO 189:NEXT:G0 

10 2649 ELSE FOR i=1 TO 199:NEXT:GOTO 2649 

2689 nblet=nblet+i:non$=non$+CHR$(car):1F nblet=4 THEN MG 
FOR i=1 TO 3489:NEXT ELSE FOR i=1 TO 189:NEXT:car=97:LO 
CATE {4tnblet,14:PRINT CHR$(car):G0TO 2648 

2698 CLS:nb=25 )YB 
2788 IF sc>score(nb) THEN nb=nb-1:1F nb=ÿ THEN 2719 ELS >KJ 
E GOTO 2708 

2719 LOCATE 7,3:PRINT"records" )CU 
2728 score$(nb+{)=sco$ :nomrec$(nb+1)=nom$:score(nb+1}=s DRT 
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c:bn=24-nb 

2739 FOR i={ TO bn 

2748 score(nb+bnti)=score(nb+bn) :nomrec$(nb+bnti)=nomre 
c$(nb+bn) :score$(nb+bn+i)=score$(nb+bn) 


>LH 
LH 


2759 NEXT )LF 
2769 IF nb<4 THEN 2899 >PG 
2779 IF nb)2ÿ THEN 3899 >PQ 
2789 FOR i:ÿ TO 8 )DB 
2799 nbr$=DEC$(nb-3+i,"##") UV 
2898 LOCATE 4,6+ix2 )ME 
2819 FOR j=1 TO 2:h$=MID$(nbr$, j,1) )BH 
2829 IF h$=" " THEN PRINT" ";:GO0T0 2838 ELSE IF h$="g" PL 


THEN PRINT CHR$(123);:GO0T0 2839 ELSE h=VAL(h$):ON h GOS 
UB 1759,1769,1779, 1788, 1799, 1899, 1819, 1829, 1838 

2839 NEXT j:PRINT" “snomrec$(nb-3+ti);" "; 

2848 FOR j=1 TO S:h$=MID$(score$(nb-3+i),j,1) 

2859 IF h$=" " OR h$="g" THEN PRINT CHR$(123); ELSE h=V 
AL(R$):0N h GOSUB 1758, 1769,1779,1789,1799,1890,1819,18 
29,1839 5 


KB 
>MK 
KW 


2869 NEXT j UC 
287ÿ NEXT i JC 
2889 GOTO 3198 >MK 
2898 FOR i=1 TO 9 )DF 
2999 nbr$=DEC$(i,"H#") )PE 
2918 LOCATE 4,4+i#2 ME 
2929 FOR j=1 TO 2:h$=MID$(nbré, j,1) >BK 
2938 IF h$=" " THEN PRINT" ";:G0T0 2949 ELSE IF h$="g" PT 


THEN PRINT CHR$(123) ; :GOTO 2949 ELSE h=VAL(h$):0N h GDS 
UB 1758,1769,1779,1789,1799, 1899, 1819, 1829, 1839 

2949 NEXT j:PRINT" "snomrec$(i);" ; 

2959 FOR j=1 TO 4:h$=MID$(score$(i),j,1) 

2969 IF h$=" " OR h$="g" THEN PRINT CHR$(123); ELSE h=V 
ALCh$):ON h GOSUB 1759,1769,1779,1789, 1799, 1899, 1819, 18 
28, 1839 


)EC 
)GN 
>KY 


2978 NEXT j HE 
2989 NEXT i WE 
2999 GOTO 3189 NB 
3898 FOR i=f TO 8 )BH 
3919 nbr$=DEC$(17+i,"H#") RT 
3929 LOCATE 4,6+i#2 MZ 
3939 FOR j=1 TO 2:h$=MID$(nbr$, j,1) BC 
3948 IF h$=" " THEN PRINT" ";:GO0TO 3958 ELSE IF h$="g" PV 


THEN PRINT CHR$(123); :GOTO 3959 ELSE h=VAL(h$):0N h GDS 
UB 1759,1769,17789,1789, 1799, 1899, 1819,1829,1839 

3459 NEXT j:PRINT" "isnomrec$(i7+i);" ; 

3969 FOR j=1 TO 4:h$=MID$(score$(17+i),j,1) 

3979 IF h$=" " OR h$="g" THEN PRINT CHR$(123); ELSE h=V 
ALCh$):0N h GOSUB 1759,1769,1779,1789, 1799, 1899,1819,18 
28, 1839 

3889 NEXT j 

3998 NEXT i 

3199 OPENOUT"record":FOR i=1 TO 25:WRIÎTE #9,score(i),no 
arec$(i),score$(i):NEXT:CLOSEOUT 


GL 
KB 
>KQ 


)VH 
>VH 
)BC 


3119 FOR i=1 TO 6999 MT 
3129 IF INKEY$C"" THEN 3148 VE 
3139 NEXT KJ 
3148 CLEAR INPUT:MODE 8:FOR i=g TO 15:INK i,8:NEXT DUX 


3159 POKE &A621,8&17:POKE &A622,8&D9:POKE &A624,424:POKE DV] 
&A625, K91:POKE &A627,83C:POKE &A62C,&23:CALL LA629:POKE 


&A627,k14:POKE &AG2C, 86 

3169 LOCATE 1,1:PEN 11:PAPER 1:PRINT CHR$(213); :PAPER 1 
L:PRINT" “;:PEN {1:PAPER O:PRINT CHR$(212):PEN 1:PAPER 
11:LOCATE 1,25:PRINT CHR$(212)" ";:PEN 9:PRINT CHR$(213 
l:PAPER 1:FOR i=2 TO 24:LOCATE 1,i:PRINT" ":NEXT 

3178 PAPER 9:FOR i=2 TO 24:LOCATE 3,i:PRINT" ":NEXT:PAP 

ER 14:F0R i=2 TO 24:LOCATE 2,i:PRINT" ":NEXT 

3189 LOCATE 18,{:PEN 11:PAPER 1:PRINT CHR$(213) ; :PAPER 

1H:PRINT" ";:PEN {1:PAPER 9:PRINT CHR$(212):PEN 1:PAPER 
11:LOCATE 18,25:PRINT CHR$(212)" ";:PEN 9:PRINT CHR$(2 
13);:PAPER 1:FOR i=2 TO 24:LOCATE 18,i:PRINT" ":NEXT 

3199 PAPER 9:FOR i=2 TO 24:LOCATE 29,i:PRINT" ":NEXT:PA 

PER 14:FDR i=2 TO 24:LOCATE 19,i:PRINT" ":NEXT 

3288 PAPER 14:PEN 2 

3219 RESTORE 5989:FOR i=2 TO 24:READ nbc:LOCATE 2, i:PRI 

NT CHR$(nbc) :NEXT 

3229 RESTORE 5999:FOR i=2 TO 24:READ nbc:LOCATE 19,i:PR 
INT CHR$(nbc}:NEXT 

3239 PEN 14:PAPER B:LOCATE 7,11:PRINT"scores" 

3249 PEN ! 

3259 FOR i=1 TO 6 

3269 ON i GOSUB 3949, 3949, 3959, 3959, 3969, 3969 

3279 FOR j=1 TO 48 

3289 IF TEST(188+j*4,236-ix2)(>ÿ THEN PLOT 188+j%4,236- 
ix2,coul 

3299 NEXT j,i 

3389 WINDOWH#!,4,17,14,24 

3319 FOR i=1 TO 6 

3328 LOCATE#1,1,ix2-1:GOSUB 3349 

3339 NEXT i:G0TO 3429 

3349 PRINT#H1," ";:POSi$=DECS(i,"#h") 

3359 FOR j=1 TO 2:n$=MID$(POSi$, j,1) 

3369 IF n$=" " THEN PRINT#!{,CHR$(123) ; :GOTO 3379 ELSE 1 

F n$="g" THEN PRINT#1,CHR$(123); :GOTO 3378 ELSE n=VAL(n 

$):0N n GOSUB 4929,4939, 4949, 4959, 4969, 4978, 4689, 4999, 4 

189 

3379 NEXT j:PRINT#1," "inomrec$(i);" ‘; 

3388 FOR j=t TO 4:h$=MID$(score$(i),j,1) 

3399 IF h$=" " OR h$="g" THEN PRINTHI,CHR$(123); ELSE h 

=VAL(h$):0N h GOSUB 4929,4939, 4949, 4959, 4969, 4970, 4988, 

2995, 4199 

3498 NEXT j 

3419 RETURN 

3424 BORDER 4:1NK 8,4:INK 1,1:INK Z,19:INK 3,26:INK 4,3 
LINK 5,6:INK 6,15:INK 7,24:INK 8,9:INK 9,14: INK 19,29:1 

NK 11,2:INK 12,18:INK 13,16:1INK 14,B:INK 15,3 

3438 FOR i=1 TO 374 

3449 IF INKEYS$(>"" THEN 3938 

3459 GOSUB 3928 

3469 NEXT 

3474 FOR i=7 TO 25 

3488 PRINTH1:PRINTHI:FOR k=1 TO 39:NEXT k:GOSUB 3349 

349ÿ NEXT 

3598 FOR i=1 TO SS9:NEXT:MODE 1:BORDER 9: INK 9,B:INK 1, 

ÿ:PEN :PAPER ÿ 

3519 LOCATE 1,23:PRINT"sedasse de son pouvoir de pensee 
.":LOCATE 1,{:PRINT"vous viviez tranquille en cette co 

ntree":LOCATE 1,21:PRINT"sinante qui n’eut permis qu'on 
le depos-" 


)VD 
)FB 
>GZ 


)LR 
NT 
JX] 
)LE 
)LX 
D'UN 
)LR 
Qu 


»26G 











3528 LOCATE 1,3:PRINT'ou l'oisivete seule vous etait co 

nnue ."{LOCATE 1,19:PRINT'"maitre tout-puissant de la re 

gion avoi-":LOCATE 1,5:PRINT"or un jour vous aviez pens 

e . certes ce" 

3534 LOCATE 1,17:PRINT'attirer les foudres du dieu refl 

ectus ,":LOCATE 1,7:PRINT"fut une pensee furtive que vo 

us n’aviez":LOCATE 1,15:PRINT"pardonne car surtout il n 

e voulait pas" 

3549 LOCATE 1,9:PRINT'pu controler et dont vous ne conn 

aissiez":LOCATE 1,13:PRINT'"mais votre peuple ne vous l” 

avait jamais":LOCATE {,11:PRINT"meme pas votre capacite 
a la produire ," 

3554 IAK 1,26 

3569 FOR i=1 TO 19999 

3579 IF INKEY$O"" THEN 3599 

3588 NEXT 

3598 CLS:INK 1,8 

3649 LOCATE 1,1:PRINT"vous connaissiez alors votre des 
sein :":LOCATE 1,21:PRINT"tre sur ces plateaux au passe 
terrible :":LOCATE 1,3:PRINT"vous deviez vous exiler a 
u pays de cet" 

3619 LOCATE {,19:PRINT"de ses dires , voila ce que l'on 
rencon-":LOCATE 1,5:PRINT'etre tyrannique . depuis vot 
re arrivee":LOCATE 1,17:PRINT'"ran , put survivre ." 
3628 LOCATE 1,7:PRINT'en cette terre peu hospitaliere v 

ous de-":LOCATE 1,15:PRINT'"sage kantorek , jadis gracie 
par le ty-":LOCATE 1,9:PRINT"viez errer sur des platea 
ux hostiles qui" 

3638 LOCATE 1,13:PRINT'dre . de ces plateaux maudits , 
seul le":LOCATE 1,11:PRINT'presentaient chacun un probl 

eme a resou-" 

3648 INK 1,26 

3659 FOR i=1 TO 19999 

3668 IF INKEY$O"" THEN 3689 

3679 NEXT 

3684 CLS:INK 1,8 

3699 PRINT"- des rochers qui genent votre progres- 

on. sur les plateaux les plus ele- ves , certains 

nt ensorceles":PRINT 

3799 PRINT"- des destructeurs : 
INT 

3719 PRINT"- des pastilles vitales : 

re ingurgitees dans leur totalite 

ateau suivant": PRINT 

3728 PRINT"'- des cadavres ensorceles , ne pas trop 

y froler !":PRINT 

3739 PRINT"- des bombes pour debloquer des passages 
fficiles":PRINT 

374ÿ PRINT"- des murs metalliques qui resistent aux 

mbes !":PRINT 

3758 PRINT"- enfin , les fantomes des personnes qui 

rirent jadis dans ces contrees . ils 

sans cesse !" 

3768 INK 1,26 

37179 FOR i=1 TO 9999 

3788 IF INKEY$O"" THEN 3889 

3799 NEXT 

3898 MODE Y:INK 1,1:PEN 3 

3819 POKE &AG21,&2:POKE &AG22,&DŸ:POKE &AG24,&7A:POKE & 


si 
50 


ils detruisent tout": 


elles doivent 
pour passer au 


bo 


pe 
vous harceleront 
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>GD 


>M4 


AU 


)BJ 
JM] 
WW 
MA 
>RH 
HZ 


> 


NU 


A625, &9F:CALL &AG28:LOCATE 4,2:PRINT"les rochers":POKE 
LAG21,k42:POKE &A622,4C1:POKE LAG24, &FO:POKE LAG25, LOC: 


CALL &AB29:LOCATE 4,6:PRINT'"les pastilles" 


3829 POKE &AG21,482:POKE &A622,&C2:POKE LAG24, &GE:PDKE  >FK 
LkAB25, kAC:CALL RA629:LOCATE 4,19:PRINT"les cadavres" :PD 
KE &A621,8C2:POKE &A622,8C3:POKE LAG24,LFB:POKE &A625,& 


9E:CALL &A62B:LOCATE 4,14:PRINT"les destructeurs" 


3838 POKE &A621,42:POKE &A622,8&C5:POKE &A624,476:POKE & 
A625,&9E:CALL &A62B:LOCATE 4,1B:PRINT"les bonbes":POKE 
LA621,&k42:POKE &A622,4C6:POKE &A624,8E8:POKE LAG25, &OA: 


CALL &A629:LOCATE 4,22:PRINT"les fantones" 


3849 FOR i=1 TO 9959 
3858 IF INKEY$C"" THEN 3679 
3869 NEXT 


3878 MODE 1:INK 3,8:LOCATE 2,12:PRINT"le curseur ou le 

joystick pour avancer" :LOCATE 3,14:PRINT CHR$(34) ;"spac 
e";CHR$(34);" ou feu pour tirer une bombe":LOCATE 19,16 
:PRINT CHR$(34) ;"s";CHR$(34);" pour se suicider": INK 3, 


26 

3869 FOR i:1 TO 7989 

3899 IF INKEY$Q"" THEN 3149 
3999 NEXT 

3919 GOTO 3149 


3929 POKE &9P54,854:POKE 49955, 8C9:CALL &BD19:CALL 4995 
Q:POKE 849954,898:POKE 49955, RC9:CALL &BD19:CALL &95D:R 


ETURN 


3939 MODE 9:INK 9,D:BORDER Y:vie=3:niv-ÿ:sc=8:bombe=2:R 


ESTORE 4119:GO0T0 158 

3949 coul=1:RETURN 

3958 coul=11:RETURN 

3968 coul=9:RETURN 

3979 coul=1#:RETURN 

3989 coul=3:RETURN 

3999 coul =7:RETURN 

4999 coul=12:RETURN 

4919 coul=9:RETURN 

4828 PRINTHL,CHR$ (124) ; :RETURN 
4938 PRINT#1,CHR$ (125) ; :RETURN 
4949 PRINT#1,CHR$ (126) ; :RETURN 
4958 PRINT#1,CHR$(127) ; :RETURN 
4968 PRINT#1,CHR$(128) ; :RETURN 
4979 PRINT#1,CHR$ (129) ; : RETURN 
4889 PRINT#1,CHR$ (139) ; : RETURN 
4999 PRINTHI,CHR$ (131) ; :RETURN 
4199 PRINT#I,CHR$ (132) ; :RETURN 
4119 DATA 9,9,9,9,9,0,0,9,0,8 
4128 DATA 8,2,9,9,5,2,9,8,0,9 
4139 DATA 9,2,8,9,1,1,9,9,9,9 
4149 DATA 8,2,9,9,8,9,9,9,9,9 
4158 DATA 9,3,9,9,0,2,0,6,9,2 
4169 DATA 8,8,9,9,8,2,9,0,9,1 
4179 DATA 9,0,8,0,9,2,8,9,9,8 
4189 DATA 8,8,9,9,8,1,9,9,9,6 
4198 DATA 9,8,9,0,2,9,9,9,9,8 
4298 DATA 6,8,2,9,0,9,9,0,8,9 
4219 DATA 1,9,9 
4229 DATA 8,2,1 
4239 DATA ÿ,1,1 
4248 DATA 8,8,9 


1 

1,1,1,1,2,9 
1,1,1,1,1,8 
9,9,9,9,9,9 


1 93%93%I%)9 


an 
un 
sl, 
9 


»GJ 


HG 
)VB 
»LJ 
>JH 


JM] 
UV 
>LD 
)MJ 
>LU 
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4259 DATA 9,9,2,2,2, 
4268 DATA 8,2,3,3,1, 
4279 DATA 9,1,1,1,1, 
4288 DATA 8,8,9,9,9, 
4299 DATA 9,9,9,8,8, 
4398 DATA 4,9,9,9,8, 
4319 DATA 9,9,1,1,1, 
4329 DATA 8,18,2 
4339 DATA 9,0,0,0,0,0 
4348 DATA 8,9,9,9,9,9 
4359 DATA 9,9,1,1,1,1 
4368 DATA 8,9,1,9,9,9 
4379 DATA 9,9,1,9,1,1 
,1,9,1,9 

,19,9,9 

Ait 

9,9,9,9 

144 


= © & DO = CO ND 
- 

- & & OO © ND © 

+ ED ER DO re 1 a 


’ 
; 


4389 DATA 9,9 
4399 DATA 9,9 
4498 DATA 8,9, 
4419 DATA 9,9, 
4429 DATA 8,8, 1, 
4438 DATA 1,1,19,1,1 
4449 DATA 1,2,9,9,2,8,9,8, 
4459 DATA 1,2,9,9,1,9,9,9, 
4469 DATA 1,1,9,9,8,9,9, 2 
4479 DATA 9,1,1,9,9,9,8,1, 
9,9 
2,9 
ÿ 
1 


, 
, 
, 


l 

1 

2 

1 

4489 DATA 4,8,9,9,1,9,9,9,8 
4498 DATA 1,9,9,1,9,9,2,9,8 
ÿ 
(] 
ÿ 
1 


4598 DATA 6,8,9,9,8,9,1, 


4519 DATA 1,8,9,9,0,2,0,1, 
4529 DATA 9,6,9,2,9,9,9,9, 
4539 DATA 9,6,9,1,9,8,9,1, 
4548 DATA 8,4,1 
4559 DATA 9,9,9,9,9 
4568 DATA 9,6,2,2,2 
4579 DATA 9,9,2, 22,9, 
di 

,9,9 

5 


’ 


4659 DATA ,1,5 
4668 DATA 9,2,2,9,5,9,2,0,2,9 
4679 DATA 1,1,2,2,1,9,2,9,2,8 


4729 DATA 8,8,9,1, 
4738 DATA 9,9,2,1, 
474$ DATA 2,8,1,2, 
4758 DATA 1,1,1,1 
#768 DATA 9,5,5 

4779 DATA 9,1,9,9,2,2,2,8,9,2 
4768 DATA 9,8,9,2,2,2,1,9,9,2 
4799 DATA 9,9,1,2,1,3,8,8,9,1 
4888 DATA 9,8,9,3,8,8,9,9,9,9 
4819 DATA 9,9,9,9,9,8,1,9,9,5 
4829 DATA 2,2,9,2,8,9,9,2,9,9 
4839 DATA 3,3,9,3,9,2,0,3,9,1 


- 
ww © © D © & = © 


UA 
DUF 
>UC 
NT 
UT 
UD 
VD 
>WH 
UM 
NT 
)VH 
NC 
JVC 
)VH 
VX 
VA 
VG 
UE 
MD 
UF 
UY 
)W 
VA 
JVL 
UK 
>VP 
>UR 
)WW 
VB 
>PK 
JUN 
)VP 
JUN 
DUB 
VD 
UD 
UA 
>VH 
VC 
DVE 
)QC 
JV] 
>UG 
)VG 
VC 
UF 
NT 
UA 
UC 
UF 
VA 
)QJ 
>VR 
NT 
)VH 
NY 
YVG 
VB 
>VK 


4849 DATA 9,8,9,9,8,3,2,8,9 
4859 DATA 9,8,9,1,9,2,1,9,9, 
4868 DATA 1,8,9,9,9,9,9,9,9, 
4879 DATA 9,19,19 

4868 DATA 9,2,2,9,89,9,1,9,1 
4899 DATA 9,2,1,9,9,9,2,9,2 
4989 DATA 9,2,9,9,9,9,2,9,2 
4919 DATA 2,1,9,9,9,2,3,9,3 
4928 DATA 2,9,9,2,1,3,1,9,8, 
4939 DATA 2,9,9,2,9,9,9,2,9, 
4949 DATA 1,2,9,2,8,2,9,1,8 
4959 DATA 9,3,8,3,8,3,1,9,9,2 
4968 DATA 89,9,9,9,9,9,9,9,9,3 
4979 DATA 9,1,9,9,9,0,9,0,0,0 
4989 DATA 9,3,6 
4999 DATA 2,2, 
5898 DATA 2,1, 
5919 DATA 2,2, 


, 
, 


5948 DATA 1,1, 
5959 DATA 2,2, 
546$ DATA 2,2, 
5979 DATA 2,1, 
5989 DATA 1,1, 
5999 DATA 9,8, 1 
5199 DATA 5,5,5,5,5,5,5,5,5,5 
5119 DATA 2,2,4,2,2,4,3,3,2,4 
5128 DATA 4,2,2,2,9,9,9,9,2,2 
5139 DATA 4,2,2,4,9,4,4,2,2,4 
5149 DATA 9,9,9,9,1,6,9,9,9,9 
5159 DATA 2,2,2,2,2,4,2,4,2,2 
51689 DATA 4,3,3,4,4,4,2,4,2,2 
5179 DATA 9,2,2,2,4,2,2,4,2,k 
5169 DATA 8,2,2,2,4,2,4,4,2,4 
5199 DATA 4,4,4,4,4,2,4,4,4,2 
5298 DATA 8,5,4 


2,2, 
1,1, 
2,9 
9,2 
5939 DATA 2, 2,9,2, 
9,2, 
9,1 
9,9 
2,2 
1,1 


me D ND = Nr 1 Fr om 
- 
CC CE CCR) 


5219 DATA 9,2,2,1,2,9,1,1,1,5 
5229 DATA 9,9,2,9,2,9,2,9,1,1 
5239 DATA 2,2,2,9,1,9,1,9,2,1 
5248 DATA 2,9,9,9,2,9,2,9,9,9 
5259 DATA 2,9,5,1,2,2,1,2,2,1 
5264 DATA 1,2,2,9,9,2,9,9,9,2 
5279 DATA 2,9,2,9,1,1,2,2,9,2 
528$ DATA 4,9,2,9,9,9,9,2,9,2 
5299 DATA 2,9,2,2,2,2,1,1,9,2 
5399 DATA 4,9,2,1,1,1,1,1,1,2 
5319 DATA 9,1,1 

5328 DATA 8,8,1,1,8,8, : 
5339 DATA 1,9,9 


1,8,9 
,59,9,8, 
5349 DATA 4,9,9,2,8,6, 

ÿ 


5388 DATA 9,2,8,9,8,8, 
5398 DATA 2,1,4,1,9,9, 
5498 DATA 1,2,9,9,1,2,1, 
5419 DATA 9,1,9,9,2,1,2,1, 
5428 DATA 2,19,1,18,19,3,3 
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ÿ 
,6 
,6 
5468 DATA 9,6 
5479 DATA 1,8 
5484 DATA 6,6 
5499 DATA 9,9 
5588 DATA 9,6 
5519 DATA 1,6 
5528 DATA 1,1 
5539 DATA 3,1 
5548 DATA 2,8 
5554 DATA 2,1 
5569 DATA 1,2, 
5579 DATA 1,1, 
5584 DATA 9, 9,9, 
5599 DATA 9,9,8, 
5698 DATA 9,9,9, 
5619 DATA 9,9,2, 


5659 DATA D, Fri 
5668 DATA 9,2,1, 
5679 DATA ÿ,1,2 
5689 DATA 9,2,1 
5699 DATA 9,1,1, 
5798 DATA 9,2,4 
5719 DATA 9,1,1, 
2,4, 

12 

8,1, 

1 


LÀ 


5728 DATA 9, 
5738 DATA 9, 
5749 DATA 8, 
5759 DATA 9,1 
5769 DATA 9,0,9,9,0,9,9,9,0,9 
5779 DATA 9,9,9,9,9,9,9,9,9,8 
5788 DATA 1,2,2,2,1,2,2,1,9,8 
579ÿ DATA a ÿ 


Omer & r> 


, 
, 
, 
, 


4, 

2 2, 
» 3,2 
1051 
5859 DATA 9,1,8 
5869 DATA 1,3,1 
5879 DATA 2,7,2 
5884 DATA 1,1,7 
1,7 

2,1 

1,2; 

1,1, 

7,2 

2,1 

1,2 

l 


5699 DATA 2, 
5998 DATA 2, 
5919 DATA 1, 
5928 DATA 2, 
5939 DATA 1, 
594% DATA 2, 
5959 DATA 2, 
5964 DATA 1,1,1, 
5979 DATA 9,5,18 


D JB me D ee —J F9 
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DUB 
>W 
UE 
DVE 
UF 
DW 
)UZ 
JW 
)VQ 
DUA 
VX 
DUH 
)VP 
>K 
VF 
NT 
DUX 
UT 
)VD 
DVE 
JVC 
)QC 
VE 
DVF 
>VA 
DVE 
VE 
DUH 
VC 
)VE 
)UG 
R 
»XE 
JU 
)VB 
JVN 
UT 
DV] 
VF 
DK 
>VM 
>VP 
VE 
DMR 
>UV 
DVF 
)VP 
VE 
UT 
DVF 
DUR 
)W 
)VL 
>UH 
)YC 


5988 DATA 32,32,97,116,116,191,119,199,114,191,32,112,1 DHF 


11,117,114,32,115,97,118,111,195,114, 32, 32,32 


599$ DATA 32, 32,32, 192,114,97,112,112,191,114,32,112,11 UD 


1,117,114,32,97,193, 195, 114, 32,32, 32e 
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FRERES Rene RES 


| Je désire recevoir le catalogue des éducatifs, possédant 


un ordinateur(s) de 














marque({(s) 

de typels) 

a l'adresse ci-contre Nom: Prénom 
Adresse: 
Code postal: Ville: 





A envoyer à SORACOM Editions - BP 88 - 35170 BRUZ 
Joindre deux timbres à 2,50 F 


Lots d'anciens numéros 

Une affaire pour votre Amstrad ! 
des dizaines d'articles 

et de programmes, 

12 Numéros de CPC 


années 85 à 90 


12 Numéros d’Amstar 
années 87 à 90. 
55 Francs + 30 francs de port. 


NAN LHLON: 


IKXereliKe;=A 101s en solde. 


























y _ Bon de commande Nom : Prénom : J 
| Je commande D RuÉ I 
l © 12 numéros de CPC pour 55F+30Fport  Codeposid: Vie: I 
1 © 12 numéros d'Amstar pour 55 F+ 30Fport Da: Signature I 
Î JE REGLE PAR CARTE BANCAIRE - 
SE AS A ee a EE 
M e joins mon règlement chèque bancaire Q I 
ü chèque postal QI mandat Q Date d'expiration | 1 | 1 | Signature I 
I I 


Retournez ce coupon, accompagné de votre chèque libellé à l'ordre des Editions SORACOM - La Haie de Pan - 35170 BRUZ 


Lmmmmmmmmmmmmmmmmm 


GUIDE DU PROGRAMMEUR 


Votre programme est maintenant fin prêt, 1l ne vous reste 
plus qu’à envoyer votre œuvre à CPC Infos. 
Mais n'oubliez pas : 






Les listi : 
INQS sur pan; 
Papier 
u n 
que les Programm e sont 
Més. es 5 















L 
e Programme enregi 
Wüdéristiques s. 


Vh 
quelaut 


qstutes ramme- 
A 1e du n1© nes 50° 






ges 8 
joies © 


RS dl 


E PROGRAMMEUR E PROGRAMME 





























NOM : Prénom: Nom : 
Adresse complète : ____ Catégorie Q Jeu Q Utilitaire Q Educatif 

| Taille : 
Tél. : —  — Age: Périphériques utilisées : 

| Support Q Cassette Q Disquette | 

ion sur Fhon Comptabilité (testée) avec : | 
Je soussigné __ | 
; TA ,… … + à 464 Q 664 Q 6128 Q PCW 8256 

déclare être l’auteur du programme ci-joint et ne l'avoir | 

| jamais proposé à une autre revue. Signature 
ER 
* Ne pouvant être tenu pour responsable de l'acheminement des paquets postaux, nous conseillons à notre aima- I 
ble clientèle de choisir l'envoi en recommandé. 


Remplissez soigneusement ce coupon et joignez-le à votre programme, sur cassette ou disquette. 





Envoyez le tout à CPC Infos — La Haie de Pan - 35170 BRUZ | 
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Petiapez à CPC os 


PETITES ANNONE 
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La place réservée aux petites annonces est limi- 
tée. En conséquence, celles-ci passent dans leur 
ordre d'arrivée. Par contre, les petites annonces 
farfelues sont systématiquement rejetées... De même, 
comme il est peu probable qu'il existe des “géné- 
reux donateurs” de matériels ou de logiciels, les 
petites annonces faisant appel à ces philantropes 
ne seront insérées que si la place le permet. 
Seront refusées toutes les annonces visant à ven- 
dre ou échanger des listes ou copies de logiciels 
non garantis “d'origine”, ainsi que toute annonce 
incitant au piratage. 

En conséquence, réfléchissez bien avant d'envoyer 
vos textes. Les petites annonces doivent impérati- 
vement nous parvenir sur la grille (découpée ou pho- 
Re es | 


+ Je suis auteur programme gestion de timbres 
pour CPC 6128. Ingles Jean, 252, rue des Saules, 
74950 Scionzier. Tél. 50.98.86.92. 





+ Vds Amstrad 6128 coul. (répa) joystick + nbx 
jeux (Prince of Persia). Incroyable, vendu 2200 F. 
Tél. 40.86.09.19. 





+ Cherche mode d'emploi du programme Amstus. 
Envoyer Mura Pierre-Louis, 30 Aymard-Durivail, 
38160 St-Marcellin. 





+ Vds jeux Amstrad CPC 6128, possède Grizor : 
100 F, Fire : 100 F, Double Dragon : 100 F. Kick 
Off 2 : 100 F. Tél. 86.52.99.89. 





+ Vds CPC 6128 mono + adapt. Péritel + souris + 
manuel + nbx jeux (Simulation, OCPart) + de 100 
jeux + joystick : 2500 F. Patrice, tél. 45.32.35.67. 





+ Vds console Nintendo avec 4 jeux dont Bayou 
Billy à 1700 F, à débattre. Tél. 40.07.02.26. 





+ Achète AMX Stop Press, AMX Page Maker, sou- 
ris AMX avec mode emploi, scanner Dart. Tél. 
87.24.34.56. 





+ Vds CPC 6128, état neuf + 2 joysticks + jeux + 
manuel : 1450 F. Tél. 48.72.53.46, Yann, après 
18 heures. 





+ Vds CPC 6128 + 1 lot de cassettes de jeux au 
prix de 6000 F. Arnaud Lefebvre, tél. 32.53.07.%. 


+ Cherche contacts sérieux sur CPC 6128. Fau- 


quembergue Maxime, Marlesicanche, 62170 Mon- 
treuil sur Mer. 





+ Vds Atari 520 STF + mon. couleur + joys. + tapis 
souris + nbx jeux. Prix : 2900 F. Tél. 20.35.53.33, 
Tran. 





+ Urgent ! Vds CPC 464 mono + env. 40 jeux 
originaux, bon état : 1200 F. Tél. 59.63.62.60, Phil. 
Barrere. 





+ Vds Amstrad CPC 464 coul. avec ext. mémoire 
256 ko + lecteur disquette DD1 et log. traitement 
de texte. Le tout : 2500 F. M. Olivier Boulay, 115, 
rue de Musselburgh, 94500 Champigny s/Marne. 
Tél. 48.81.93.28. 





+ Vds Amst. 6128 coul., 80 jeux + nbr. revues et 
utilitaires : 3000 F. Tél. 30.51.50.54, Stéphane. 





+ Vds CPC 6128 + nombr. jeux, programmes, lis- 
tings, notice complète : 2000 F. Tél. 48.83.76.73, 
région Paris. 





+ Vds 6128 couleur (encore garantie) + nbrx jeux. 
Prix : 3200 F (à débattre). Tél. 83.82.95.63. 





+ Screen 9 est sorti, pour le recevoir 1 disc + 1 
timbre à 3,80 F. Dettori Patrick, 11, rue du Casino, 
83230 Bormes. 





+ Sega : cause achat CPC Amstrad vds 62 cartou- 
ches + cartes 50 % contre timbre. Bruno Bernold, 
9, rue Elvetti, 74 Ambily. 


+ Cherche listing entier de Cherry Paint paru dans 
les premiers numéros de CPC. Faire offre au 
76.64.00.66, h. r. 





+ J'achète “Clés pour Amstrad” de PSI éditeur. 
Ludovic Delabre, Le Pré La Tour Les Alerions, 
54700 Pont-à-Mousson. 





* Recherche qui saurait adapter un disk dur 40 
mégas sur Amstrad CPC 6128. Tél. 35.68.59.96. 





+ Rech. Total Eclipse 1 et 2, The Dark Side K7 ou 
mieux disk. Tél. 16.1 69.41.22.34. 


+ Vds CPC 464 mono + DMP 2000 + lecteur DDI-1 
+ disquettes + livres : 2000 F. Tél. 77.58.11.23, 
heures repas. 





+ Cherche moniteur coul. CTM 644. Tél. 


96.38.05.46. 





+ Vds CPC 6128 couleur + logiciels divers + digita- 
liseurs + souris + imprimante + docs + lecteur. Tél. 
45.87.10.49. 





+ Achète livres DBase Il sur CPC de C. Delannoy, 
Pratique des imprimantes de M. Archambault. Tél. 
35.77.26.42. 





+ Pour pratiquer sur CPC 6128 achète livres de 
programmes : 
30.30.22.46. 


jeux ou utilitaires. Tél. 16.1 
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LES PETITES ANNONCES ET LES MESSAGES 


Attention, vos PA seront mises sur le serveur avant la parution du joumal 
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FI 








| 
RER 








nu 
| 1 | 





Mettre ce coupon + 4 timbres à 2,50 F dans une enveloppe. 
Adresser le tout à : SORACOM - La Haie de Pan - 35170 BRUZ 


Gagnez du temps ! Sur Minitel 36.15, tapez MHZ 
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ABONNEZ-VOUS ! 


Re 


11 numéros 
vAltRE 


RER CT. 
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D'ECONOMIE 



































5% de remise 
sur les produits FRE % | 
du catalogue À rad V 0 fée 
SORACOM ER CT OP LT 
je désire m'abonner à CPC infos pour ATTENTION ! 
0 U ] , Un an au prix de 210 F (11 numéros) SEUL CE BULLETIN 
D'ABONNEMENT 
Nom : Prénom : EST VALABLE 
Adresse : 
Code postal : Ville: PANE REC 
Date : Signature VOTRE 
obligatoire | CARTE 
BANCAIRE 
Z 
à 
° Les abonnements ne sont pas rétroactifs Q je désire payer avec une carte bancaire Date d'expiration V 
e Envoi par avion + 165 F 
: ÉD EE A 0 2 EURE 








Envoyez votre bulletin accompagné du règlement à : Editions SORACOM - Service abonnement - BP 88 - 35170 BRUZ 








TELECHARGEZ 


LES MEILLEURS LOGICIELS PUBLIES DANS AMSTAR & CPC 
ET CPC HORS SERIE 





Simple, rapide, efficace : 
Téléchargez les listings publiés dans 
le mensuel Amstar & CPC et dans le 
bimestriel CPC Hors Série. 

Il vous suffit pour cela de notre logi- 
ciel ARCADES, et d’un câble de liai- 
son minitelCPC que nous pouvons vous 
fournir. 

Sur 36 15 Arcades, des jeux et des 


utilitaires, du son et du graphisme. 


LA COMMUNICATION 
C'EST NOTRE METIER 


Voir bon de commande page 31 


<IRE 





ATTENTION : Seul le câble Arcades fonctionne avec le logiciel de téléchargement. 
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102 F + port 






Port + 25 F par article 
port + 40 F par article pour l'étranger 


LJeEETe 


180 F + port | 


190 F + port 


> 


155 F + port| 3 


Nouveau ! les mêmes en noir 


a = EE 
ne | 
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" ss Pins indiquer la boîte) 


_ —— 


Voir bon de commande page 38 
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